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PREFACE 


In  order  to  examine  specific  Automated  Guideway  Transit  (AGT)  develop- 
ments and  concepts  - and  to  build  a better  knowledge  base  for  future 
decision-making  - the  Urban  Mass  Transportation  Administration  (UMTA)  has 
undertaken  a new  program  of  studies  and  technology  investigations  called  the 
UMTA  Automated  Guideway  Transit  Technology  (AGTT)  program.  The  objectives 
of  one  segment  of  the  AGTT  program,  the  System  Operation  Studies  (SOS),  are 
to  develop  models  for  the  analysis  of  system  operations,  to  evaluate  perform- 
ance and  cost,  and  to  establish  guidelines  for  the  design  and  operation  of 
AGT  systems.  A team  headed  by  GM  Transportation  Systems  Division  (GM  TSD)  has 
been  awarded  a contract  by  the  Transportation  Systems  Center  to  pursue  these 
objectives.  The  Technical  Monitor  for  the  Project  at  TSC  was  Arthur  Priver, 
who  was  assisted  by  Li  Shin  Yuan  and  Thomas  Dooley. 

This  document  was  prepared  under  the  direction  of  the  SOS  Program  Manager, 
James  F.  Thompson,  at  GM  TSD.  The  report  was  authored  by  Robert  Oglesby, 

GM  TSD. 
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1.0  INTRODUCTION 


1.1  IDENTIFICATION 

The  System  Availability  Model  (SAM)  was  designed  by  Robert  Oglesby  of 
General  Motors  Transportation  Systems  Division  (GM  TSD),  and  James  Bo Idig, 

GM  TSD.  It  was  programmed  by  Eugene  Mauch  of  Applied  Systems  Corporation. 

GM  TSD  Report  No.  EP-77056A,  System  Availability  Model  Technical  Specification, 
September  1977,  specifies  the  technical  requirements  for  the  SAM. 

1.2  HARDWARE  AND  SOFTWARE  FOR  PROGRAM  MODIFICATION 

The  following  system  software  is  required  for  program  modification.  The 
software  listed  in  the  SAM  Users  Manual  is  also  assumed. 

1.  PARAFOR 

2.  FORTRAN  IV  (H  extended) 

3.  Linkage  editor  compatible  with  the  operating  system  used. 

The  model  occupies  approximately  1 MB  of  disk  storage  including  both  source 
files  and  execution  files  (test  case). 
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2.0  PROGRAM  DESCRIPTION 


2.1  INPUT  PROCESSOR 

The  input  processor  generates  a structured  data  file  that  contains  everything 
that  the  model  processor  needs.  The  data  needed  to  generate  this  file  comes  from  the 
user-provided  (runtime)  inputs,  the  trip  logs  generated  by  DESM,  and  optionally  from 
an  existing  structured  data  file. 

The  inputs  are  initialized  from  the  existing  data  file;  if  none  is  specified  All  NIT 
initializes  them  to  zero. 

The  user  inputs  are  provided  via  GDIP.  GDIP  is  invoked  from  AACCRD  which 
does  all  control  card  processing.  The  single  call  to  it  processes  the  entire  runtime  input. 
The  FAILURE  control  card  is  reprocessed  later  by  rereading  the  temporary  file  used  by 

AACCRD.  The  particular  control  card  names  are  passed  to  AACCRD. 

The  trip  log  processing  is  controlled  by  AINPUT  and  actually  done  in  AINUMT. 
Each  FAILURE  control  card  causes  a trip  log  to  be  compared  to  the  reference  trip  log. 

The  passengers  are  accumulated  in  an  array  (NUMTRP)  according  to  their  delay.  The 
FAILURE  control  card  contains  the  region,  demand  period,  and  subsystem  containing 
the  failure  and  the  failure  level.  These  are  used  to  select  a cross  section  of  NUMTRP 
to  use  as  an  accumulator.  (The  remaining  dimension  is  delay  threshold.)  If  more  than 
one  FAILURE  card  has  the  same  parameters,  the  trip  logs  are  averaged  (Unweighted). 
First,  AINPUT  initializes  NOFAIL  to  zero.  NOFAIL  is  used  to  count  the  number  of  trip 
logs  processed  for  each  element  of  NUMTRP.  It  is  the  divisor  for  the  average.  Then, 
it  reads  the  control  card  file  and  processes  each  FAILURE  control  card.  If  it  is  determined 
to  be  valid,  the  appropriate  element  of  NOFAIL  is  incremented.  If  this  is  the  first  trip 
log  in  this  element,  the  corresponding  elements  of  NUMTRP  are  zeroed. 

Now,  NUMTRP  reads  each  trip  log  (referenced  and  failed)  comparing  trips.  This 
is  similar  to  the  usual  merge  technique;  each  trip  log  is  ordered  and  this  fact  is  utilized. 
ASCMPR  is  an  ordering  function  which  is  used  to  determine  which  trip  is  first.  Each 
trip  in  a trip  log  must  come  before  the  next  record  of  the  trip  log  according  to  ASCMPR. 
Unmatched  trips  are  skipped.  Unmatched  trips  in  the  reference  trip  log  are  accumulated 
in  UNMTCH.  Unmatched  trips  in  the  failed  trip  log  are  just  ignored.  For  matching  trips 
the  termination  time  (arrival  at  destination)  times  are  subtracted  and  compared  to  the 
thresholds  to  determine  which  if  any  of  the  accumulators  should  receive  these  passengers. 
(A  trip  may  contain  more  than  one  passenger.) 
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TABLE  2-1 . SAM  INPUT  PROCESSOR  PROGRAM  STRUCTURE 


AINPUT 

AADATE 

DAYTIM 

DTIMEL 

FASPAR 

FAGETP 

AIINIT 

AACCRD 

AACOPY 

NDBOR 

XGDIPF4 

FIERR 

AINUMT 

ASCMPR 

AIOUT 

AAINDX 

FAGETP 

AAPNDX 

AACCPY 

AIRPTS 

AISUMY 

DAYTIM 

DTIMEL 

AISBSR 

INPUT  PROCESSOR  MAIN  PROGRAM 
GET  DATE  AND  TIME  IN  CHARACTER  FORMAT 
GET  DATE  AND  TIME  IN  INTEGER  FORMAT 
GET  DATE  AND  TIME  FROM  SYSTEM 
SAVE  PARAMETER  ADDRESS 

GET  A PARAMETER  FROM  THE  PARAMETER  FIELD 
INITIALIZE 

READ  AND  PROCESS  CONTROL  CARDS 

COPY  CARD  IMAGES  FROM  ONE  I/O  UNIT  TO  ANOTHER 

READ  GDIP  INPUT 

FULL  WORD  INPUT  ROUTINE 

ROUTINE  TO  PROCESS  UNKNOWN  VARIABLE  NAMES 

PROCESS  A TRIPLOG  TO  DETERMINE  PASSENGERS  DELAYED 

COMPARE  TWO  TRIPS  TO  DETERMINE  WHICH  IS  'FIRST' 

WRITE  THE  STRUCTURED  DATA  FILE 

WRITE  THE  INDEX  FILE 

GET  A PARAMETER  FROM  THE  PARM=  FIELD 

PRINT  ONE  ENTRY  IN  THE  INDEX  FILE 

COPY  CHARACTERS  WHILE  DELETING  BLANKS 

PRINT  THE  INPUT  PROCESSOR  REPORTS 

PRINT  THE  INPUT  SUMMARY  REPORT 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

PRINT  THE  SUBSYSTEM  FAILURE  RATES 

DAYTIM  GET  THE  DATE  IN  INTEGER  FORMAT 
DTIMEL  GET  THE  DATE  FROM  THE  SYSTEM 
AONUMT  PRINT  THE  NUMBER  OF  TRIPS  DELAYED  REPORT 


DAYTIM 

DTIMEL 

AODLTI 

DAYTIM 

DTIMEL 

GET  THE  DATE  IN  INTEGER  FORMAT 
GET  THE  DATE  FROM  THE  SYSTEM 
PRINT  THE  VEHICLE  DELAY  TIME  REPORT 
GET  THE  DATE  IN  INTEGER  FORMAT 
GET  THE  DATE  FROM  THE  SYSTEM 
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2.2  MODEL  PROCESSOR 


All  the  model  processor  inputs  are  contained  in  the  structured  data  file.  After 
the  program  has  read  it  and  performed  the  initialization  functions,  ARGFAL  computes 
the  number  of  failures  expected  in  each  subsystem  from  the  failure  rates  and  system 
usage  parameters.  AVDEL  computes  the  vehicle  availability  from  the  expected  number 
of  failures  and  the  anticipated  vehicle  delay  for  each  failure. 

APDEL  computes  the  passenger  availability  from  the  expected  number  of  failures 
and  the  number  of  passengers  delayed  by  each  failure  (computed  from  the  trip  log). 

APZERO  computes: 


Po 


(nv)m 

m! 

1 


1 


+ 


AVFMF  computes: 
FMF  = PQ 


3 2 

m + (m  - m ) (m/?) 


(m  - m/>)2  (m/>)m  , m<^2 

— - + m/> 

i =0 


m ! 


AVPRB  computes: 


PROB 


K^1  fr”/3)'  ' 

i=0  i ! 


K < m 
K > m 


The  calculation  of  Pq,  FMF,  and  PROB  are  carefully  coded  to  avoid  overflow. 
For  reasonable  input  values  the  factorials  and  exponentials  could  exceed  the  range 
available  with  floating-point  representation  unless  this  were  done. 
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TABLE  2-2.  SAM  MODEL  PROCESSOR  PROGRAM  STRUCTURE 


AMSUP 

AADATE 

DAYTIM 

DTIMEL 

FASPAR 

FAGETP 

AREAD 

ASUBSR 

ARGFAL 

AVDEL 

APHIST 

APDEL 

AVFLSZ 

APZERO 

AVPROD 

AVSUM 

AVFMF 

AVPROD 

AVSUM 

AVPRB 

AVSUM 

AVPROD 

AMOUT 

AAINDX 

FAGETP 

AAPNDX 

AACCPY 


SUPERVISORY  PORTION  OF  THE  SAM  MODEL  PROCESSOR 

GET  THE  DATE  IN  CHARACTER  FORMAT 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

SAVE  THE  PARAMETERS  FROM  THE  EXEC  STATEMENT 

GET  A PARAMETER  FROM  THE  EXEC  STATEMENT 

READ  THE  STRUCTURED  DATA  FILE 

COMPUTE  THE  SUBSYSTEM  FAILURE  AND  FAILURE  EFFECT  RATES 
COMPUTE  THE  FAILURES  FOR  EACH  SUBSYSTEM  BY  REGION 
COMPUTE  THE  VEHICLE  DELAY  TIMES  AND  AVAILABILITY 
COMPUTE  THE  PASSENGER  AVAILABILITY  FOR  THE  THRESHHOLDS 
COMPUTE  THE  PASSENGER  DELAY  TIMES  AND  AVAILABILITY 
COMPUTE  THE  MAINTENANCE  AND  STANDBY  FLEET  MEASURES 
COMPUTE  PO 

COMPUTE  (M  RHO)**N/N ! 

COMPUTE  THE  SUMMATION  OF  (M  RHO)**I/l!  FOR  1=1,..., N 
COMPUTE  THE  FAILURE  MAINTENANCE  FLEET  SIZE 
COMPUTE  (M  RHO )**N/N ! 

COMPUTE  THE  SUMMATION  OF  (M  RHO)**I/l!  FOR  1=1,..., N 
COMPUTE  THE  PROBABILITY  OF  THE  STANDBY  FLEET  BEING 
ADEQUATE  TO  MAINTAIN  THE  ACTIVE  FLEET 
COMPUTE  THE  SUMMATION  OF  (M  RHO)**I/I!  FOR  1=1,..., N 
COMPUTE  (M  RHO )**N/N ! 

WRITE  THE  STATS  FILE  (RELIABILITY  LEVEL  DEPENDENT) 

GENERATE  THE  RUN  INDEX  FILE  ENTRIES  FOR  THIS  EXECUTIOh 

GET  A PARAMETER  FROM  THE  EXEC  CARD 

WRITE  ONE  ENTRY  INTO  THE  RUN  INDEX  FILE 

COPY  A CHARACTER  STRING  WHILE  ELIMINATING  BLANKS 
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2.3  OUTPUT  PROCESSOR 


The  output  processor  reads  the  raw  statistics  file  and  generates  standard  reports. 
It  also  produces  the  performance  summary  file.  Each  report  has  a subroutine  that 
generates  it. 


TABLE  2-3.  SAM  OUTPUT  PROCESSOR  PROGRAM  STRUCTURE 


AOUTPT 

AADATE 

DAYTIM 

DTIMEL 

FASPAR 

FAGETP 

AACCRD 

AACOPY 

NDBOR 

XGDIPF4 

FIERR 

AOREAD 

AORELY 

DAYTIM 

DTIMEL 

AOSBSR 

DAYTIM 

DTIMEL 

AOPASS 

DAYTIM 

DTIMEL 

AOMAIN 

DAYTIM 

DTIMEL 

AOVEH 

DAYTIM 

DTIMEL 

AOPSUM 

AODLTI 

DAYTIM 

DTIMEL 

AONUMT 

DAYTIM 

DTIMEL 

AAINDX 

FAGETP 

AAPNDX 

AACCPY 


OUTPUT  PROCESSOR  MAIN  PROGRAM 
GET  DATE  IN  CHARACTER  FORMAT 
GET  DATE  IN  INTEGER  FORMAT 
GET  DATE  FROM  SYSTEM 

SAVE  THE  PARAMETER  FIELD  OF  THE  EXEC  CARD 

GET  A PARAMETER  FROM  THE  EXEC  CARD 

READ  AND  PROCESS  CONTROL  CARDS 

COPY  CARDS  FROM  ONE  I/O  UNIT  TO  ANOTHER 

READ  GDIP  INPUT 

PROCESS  FULL  WORD  VARIABLES 

PROCESS  UNRECOGNIZED  VARIABLE  NAMES 

READ  THE  RELIABILITY  LEVEL  DEPENDENT  PART  OF  RAW  STATS 

OUTPUT  THE  FAILURE  RATE  REPORTS 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

WRITE  THE  SUBSYSTEM  FAILURE  RATE  REPORT 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

PRINT  THE  PASSENGER  AVAILABILITY  REPORT 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

PRINT  THE  MAINTENANCE  FLEET  REPORT 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

PRINT  THE  VEHICLE  AVAILABILITY  REPORT 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

WRITE  THE  PERFORMANCE  SUMMARY  FILE 

PRINT  THE  VEHICLE  DELAY  TIME  REPORT 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

PRINT  THE  NUMBER  OF  TRIPS  DELAYED  REPORT 

GET  THE  DATE  IN  INTEGER  FORMAT 

GET  THE  DATE  FROM  THE  SYSTEM 

RECORD  THIS  EXECUTION  IN  THE  RUN  INDEX  FILE 

RETREIVE  A PARAMETER  FROM  EXEC  CARD 

WRITE  AN  ENTRY  INTO  THE  RUN  INDEX  FILE 

COPY  CHARACTERS  DELETING  BLANKS 
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3.0  GLOBAL  VARIABLE  DICTIONARY 


3.1  INPUT  PROCESSOR 

All  common  variables 

Variable 

KNDM 

KNREG 

KNFL 

KNLVL 

KNDL 

KNCMP 

FLTSLT 

RRATE 

SMFREQ 

SMST 

DMND 

DLTIME 


FRATE 


GWMILE 

NUMTRP 


SYSTIM 

PNS 

VINSTA 

VN 

VM 


are  in  common  block  SAM  which  is  described  below: 


Dimension  Type  Function 


1*4  GDIP  Input  (see  User's  Manual) 

1*4 

1*4 

1*4 

1*4 

1*4 

1*4 

R*4 

R*4 

R*4 

KMDM  R*4 

KMREG  R*4 

KMDM 

KMSUB 

KMFL 

KMSUB  R*4 

KMRD 

KMLVL 

KMFL 

KMREG  R*4 

KMREG  1*4 

KMDM 

KMDL 

KMSUB 

KMFL 

KMDM  R*4 

KMREG  R*4 

KMDM 

KMREG  R*4 

KMDM 

KMREG  R*4 

KMDM 

KMREG  R*4 

KMDM 
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Variable 

Dimension 

Typ« 

VOPTIM 

KMREG 

R*4 

KMDM 

VTHRDM 

R*4 

THRIND 

R*4 

Function 


3.2  MODEL  PROCESSOR 

The  model  processor  has  no  global  variables. 

3.3  OUTPUT  PROCESSOR 

All  common  variables  are  included  in  the  common  block  AOPARM  which  is 
described  below.  All  variables  are  GDIP  inputs  and  are  described  in  the  user's  manua 


Variable 

Typ' 

FDLTI 

1*4 

FMAIN 

1*4 

FNTRP 

1*4 

FPASS 

1*4 

FRELY 

1*4 

FSUBSR 

1*4 

FVEH 

1*4 

STATS 

1*4 
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4.0  DEBUG  TOOLS 


4.1  ADDITIONAL  DEBUG  OUTPUT 

Debugging  output  is  turned  on  by  adding  the  parameter  DEBUG=ON  to  the 
EXEC  statement  in  the  JCLthat  executes  the  processor.  The  debugging  output  avail- 
able is: 


Input  processor 


Module 

Message 

Function 

AINPUT 

AINUMT 

A!  POOS 

Display  the  passenger  delay  threshholds 
Display  inputs  to  each  comparison 

Model  processor 

AVFLSZ 

— 

Various  internal  fleet  size  variables 

Output  processor 

None 

4.2  DEBUG  IMPLEMENTATION 

The  catalogued  procedure  passes  the  contents  of  the  DEBUG  parameter  to  the 
program  via  the  PARM=  field.  The  main  program  retrieves  it  by  the  subroutine  FAGETP  and 
compares  it  to  its  legal  value  (ON)  and  sets  the  variable  DEBUG  to  zero  if  output 
is  to  be  omitted.  Otherwise  it  is  the  110  unit  to  receive  the  output.  Anywhere  DEBUG 
output  is  desired  the  following  statement  is  used: 

IF  (DEBUG.  NE.O)  WRITE  (DEBUG,  format)  list 
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5.0  SUBPROGRAM  LOGIC  TABLE 


1 MODULE 

I 

I CSECT 

I 

1 ENTRY 

1 

CALLS! CALLED  1 
1 BY  1 

1 AACCPY 

1 AACCPY 

1 AACCPY 

IAAPNDX 1 

IAACCRD 

IAACCRD 

IAACCRD 

AACOPY 

1 AINPUT! 

1 

1 

1 

NDBOR 

IAOUTPTI 

1 AACOPY 

1 AACOPY 

1 

1 AACOPY 

AACCRD 1 

IAADATE 

IAADATE 

IAADATE 

DAYTIM 

AINPUT 1 

1 

1 

1 

AMS UP  1 

! 

1 

1 

IAOUTPT 1 

iAAINDX 

IAAINDX 

IAAINDX 

AAPNDX 

AINPUT 1 

I 

1 

1 

FAGETP 

AMSUP  1 

1 

1 

1 

AOUTPT 1 

IAAPNDX 

| 

IAAPNDX 

1 

IAAPNDX 

B 

AACCPY 

AAINDX 1 

IAIGDIP 

1 GDIPSECT 1 GDIP4 

FIERR 

| 

NDBOR  1 

I 

1 

1 

GDIPF4 

1 

1 AIINIT 

1 AIINIT 

1 AIINIT 

AINPUT 1 

1 AINPUT 

1 AINPUT 

IAINFUT 

AACCRD 

I 

1 

1 

1 

AADATE 

1 

I 

1 

I 

AAINDX 

1 

1 

1 

1 

AIINIT 

1 

1 

1 

1 

AINUMT 

1 

i 

1 

1 

AIOUT 

1 

I 

1 

1 

AIRPTS 

1 

1 

1 

1 

FAGETP 

! 

S 

1 

I 

FASPAR 

1 

IAIHUMT 

1 AINUMT 

| 

1 AINUMT 

| 

ASCMPR 

AINPUT! 

| 

IAIOUT 

IAIOUT 

IAIOUT 

AINPUT 1 

IAIRPTS 

IAIRPTS 

IAIRPTS 

AISUMY 

AINPUT 1 

I 

1 

1 

AODLTI 

1 

1 

1 

1 

A0NUI1T 

1 

1 AISBSR 

1 AISBSR 

1 AISBSR 

DAYTIM 

AISUMY 1 

IAISUMY 

1 AISUMY 

IAISUMY 

AISBSR 

AIRPTS 1 

! 

1 

I 

DAYTIM 

1 

IAM0UT 

IAM0UT 

1 AMOUT 

AMSUP  1 
1 

| 

IAMSUP 

IAMSUP 

| 

IAMSUP 

AADATE 

ll 

1 

1 

1 

1 

AAINDX 

1 

I 

1 

1 

AMOUT 

1 

! 

1 

1 

AFHIST 

1 

I 

I 

1 

AREAD 

1 

1 

1 

1 

ARGFAL 

1 

1 

1 

1 

ASUBSR 

1 

1 

1 

1 

AVDEL 

1 

1 

1 

1 

AVFLSZ 

1 

1 

1 

1 

FAGETP 

1 

I 

1 

1 

FASPAR 

1 

1 AODLTI 

1 AODLTI 

1 AODLTI 

DAYTIM 

AIRPTS 1 

1 

1 

1 

AOUTPT I 

IAOGDIP 

1 GDIPSECT 1 GDIP4 

FIERR 

NDBOR  1 

1 

1 

1 

GDIPF4 

1 

1 AOMAIN 

1 AOMAIN 

1 AOMAIN 

DAYTIM 

AOUTPT 1 

IA0NUMT 

IAONUMT 

IAONUMT 

DAYTIM 

AIRPTS 1 

1 

1 

1 

AOUTPT 1 

IA0PASS 

1 AOPASS 

1 AOPASS 

DAYTIM 

AOUTPT 1 

1 AOFSUM 

1 AOPSUM 

1 AOPSUM 

AOUTPT 1 

! AOREAD 

1 AOREAD 

1 AOREAD 

AOUTPT 1 

| 

| 

1 AORELY 

1 

1 AORELY 

| 

1 AORELY 

AOSBSR 

AOUTPT 1 

1 

1 

1 

DAYTIM 

1 

1 AOSBSR 

1 

1 AOSBSR 

1 

1 AOSBSR 

1 

DAYTIM 

AORELY 1 

1 

FUNCTION 


Copy  characters  deleting  blanks 
Read  and  process  control  cards 

Copy  cards  from  one  I/O  unit  to 
another 

Get  date  in  character  format 


Record  this  execution  into  the  run 
index  file 

Write  an  entry  into  the  run  index 
file 

Scan  the  list  of  GDIP  variables  for 
the  current  name 

Initialise 

Input  processor  main  program 


Process  a TRIPLOG  to  determine 
passengers  delayed 
Write  the  structured  data  file 
Print  the  input  processor  reports 


Print  the  subsystem  failure  rates 
Print  the  input  summary  report 

Write  the  STATS  file  (reliability 
dependent  portion  only'' 
Supervisory  portion  of  the  SAM  model 
processor 


Print  the  vehicle  delay  time  report 

Scan  the  output  processor  GDIP 
table  for  the  current  variable 
Print  the  fleet  maintenance  report 
Print  the  number  of  trips  delayed 
report 

Print  the  passenger  availability 
Write  the  performance  summary  file 
Read  the  reliability  level  dependent 
part  of  the  rau  statistics  file 
Output  the  failure  rate  reports 

Write  the  subsystem  failure  rate 

report 
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MODULE 

1 CSECT 

1 

1 ENTRY  1 CALLS  1 CALLED 

1 1 1 BY 

AOUTPT 

1 AOUTPT 

1 AOUTPT IAACCRDI 

1 

1 IAADATEI 

1 

1 IAAINDXI 

1 

1 IAODLTII 

1 

1 1 AOMAIN 1 

1 

1 1 AONUMT 1 

1 

1 IAOPASSI 

1 

1 IAOPSUMI 

1 

1 IAOREADI 

1 

1 IAORELYI 

1 

1 1 AOVEH 

1 

1 

1 IFAGETPI 

1 

1 1 FASPAR 1 

AOVEH 

1 AOVEH 

1 AOVEH  1 DAYTIM 1 AOUTPT 

APDEL 

1 APDEL 

1 

1 APDEL  1 

| | 

1 APHIST 

| 

APHIST 

1 APHIST 

1 

1 APHIST 1 APDEL 

1 1 

1 AMSUP 

1 

APZERO 

1 APZERO 

1 APZERO 1 AVPROD 1 AVFLSZ 

1 

1 1 AVSUM 

1 

AREAD 

1 AREAD 

1 AREAD  1 

1 AMSUP 

ARGFAL 

1 ARGFAL 

I 

1 ARGFAL 1 

| | 

1 AMSUP 

| 

ASCMPR 

1 ASCMPR 

1 

1 ASCMPR 1 

1 AINUMT 

ASUBSR 

1 ASUBSR 

1 

| | 

1 ASUBSR 1 

| 

1 AMSUP 

AVDEL 

1 AVDEL 

1 

| | 

1 AVDEL  1 

1 1 

| 

1 AMSUP 

AVFLSZ 

1 AVFLSZ 

1 AVFLSZ 1 APZERO ! AMSUP 

1 

1 1 AVFMF 

1 

1 

1 1 AVPRB 

1 

AVFMF 

I AVFMF 

1 AVFMF  1 AVPROD 1 AVFLSZ 

1 

1 1 AVSUM 

1 

AVPRB 

1 AVPRB 

1 AVPRB  1 AVPROD 1 AVFLSZ 

1 

1 

1 1 AVSUM 

1 

AVPROD 

1 AVPROD 

| | 

1 AVPROD 1 

| 

1 APZERO 

i 

1 i 

1 AVFMF 

1 

1 1 

1 AVPRB 

AVSUM 

1 AVSUM 

1 AVSUM  1 

1 APZERO 

1 

1 1 

1 AVFMF 

1 

1 1 

1 AVPRB 

DAYTIM 

1 DAYTIM 

1 DAYTIM 'TIMES 

IAADATE 

1 

1 1 

1 AISBSR 

1 

1 1 

1 AISUMY 

1 

1 1 

1 AODLTI 

1 

1 1 

1 AOMAIN 

1 

1 I 

1 AONUMT 

1 

1 1 

1 AOPASS 

1 

1 1 

1 AOP.ELY 

1 

1 1 

IAOSBSR 

1 

1 1 

1 AOVEH 

DTIMEL 

ITIMESECT 

1 TIMES  1 

1 DAYTIM 

FASPAR 

1 FASPAR 

IFAGETP  1 

1 AAINDX 

1 

1 1 

1 AINPUT 

! 

1 1 

1 AMSUP 

1 

1 1 

1 AOUTPT 

1 

1 FASPAR 1 

1 AINPUT 

1 

1 1 

1 AMSUP 

1 

1 1 

1 AOUTPT 

FIERR 

1 FIERR 

IFIEF.R  1 

IGDIP4 

XGDIPF  4 

IGDIPF4 

1 GDIPF4 1 SUDOGO 1 GDIP 4 

XNDBOR 

INDBOR 

INDBOR  IGDIP4 

IAACCRD 

XPSEUDO 

IFFIOCS 

1 SUDOGO 1 

IGDIPF4 

FUNCTION 


Output  processor  main  program 


Print  the  vehicle  availability 
Compute  passenger  delay  times  and 
passenger  availability 
Compute  the  passenger  availability 
for  the  threshholds 
Compute  PO 

Read  the  structured  data  file 
Compute  the  failures  for  each 
subsystem  by  region 
Compare  two  trips  to  determine  which 
is  FIRST 

Compute  the  subsystem  failure  and 
failure  effect  rates 
Compute  the  vehicle  delay  times  and 
availablity 

Compute  the  maintenance  and  standby 
fleet  measures 

Compute  the  failure  maintenance  fleet 
measures 

Compute  the  probability  of  the 

standby  fleet  being  adequate  to 
maintain  the  active  fleet 
Compute  CM  rho)**N/N! 


Compute  the  summation  of 
(M  rho)**I/I! 
where  1=1 , . . . ,N 

Get  the  date  in  integer  format 


Get  the  date  from  the  system 
Get  a parameter  from  the  PARM=  field 
saved  by  FASPAR 


Save  the  PARM=  field  from  the  EXEC 
statement  of  the  JCL 

Routine  to  process  unknown  variables 

Full  word  GDIP  input  routine 

Main  GDIP  read  routine 

Pseudo  read  routine 
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6.0  SUBPROGRAM  DESCRIPTIONS 


6.1  AACCPY  - Copy  Character  Strings  Deleting  Blanks 


6.1.1  Identification 
Language:  PARAFOR 

6.1.2  Calling  Sequence 

CALL  AACCPY  (TO,  INTO,  KMTO,  FROM,  KMFROM) 

6.1.3  Local  Variable  Dictionary 


NAME  1 TYPE  1 

DIM 

1 

ARG 

FUNCTION 

BLANK  1 

LI 

1 

1 

1 

CONSTANT 

FROM  1 
INFROM 1 

LI 

14 

1 KMFROM 1 
1 1 

ARG 

1 

STRING  TO  BE  COPIED 
INDEX  FOR  FROM 

INTO  1 

14 

1 

1 

ARG 

1 

FIRST  CHARACTER  TO  COPY 

' TO/NEXT  EMPTY  CHAR 

KMFROM 1 

14 

1 

| 

ARG 

1 

LENGTH  OF  STRING  TO  BE 

COPIED 

KMTO  1 

14 

1 

I 

ARG 

1 

LENGTH  OF  AREA  TO  COPY 

STRING  TO 

TO  1 

+■ 

LI 

1 

- + • 

KMTO 

1 

-+• 

ARG 

1 

- + ■ 

AREA  TO  COPY  STRING  TO 

6.1.4  Description 


The  purpose  of  this  subprogram  is  to  copy  character  strings  while  deleting  blanks. 
KMFROM  characters  starting  with  FROM(l)  are  copied  to  TO  (INTO);  INTO  is  uodated 
to  the  next  position  beyond  the  last  character  copied.  Blank  characters  are  omitted. 

No  characters  may  be  copied  beyond  TO  (KMTO).  AACCPY  may  be  called  with  sub- 
scripted  arrays  to  start  a position  other  than  the  beginning;  KMTO  should  be  adjusted 
to  avoid  array  overflow.  The  parameters  do  not  need  to  be  LOGICAL*  1;  they  are 
defined  this  way  in  AACCPY  to  permit  individual  characters  to  be  manipulated. 

6.1.5  PDL 


SUBROUTINE  AACCPY 
INFROM  = 1 
WHILE 

INFROM  <=  KMFROM  AND 
INTO  <=  KMTO 
DO 

IF 

FROM (INFROM)  -=  BLANK 
THEN 

TO (INTO)  = FROM(INTO) 
INTO  = INTO  + 1 
ENDIF 

INFROM  = INFROM  ♦ 1 
ENDDO 
RETURN 
END 
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6.1.6  Algorithms 


None 

6.1 .7  Notes  or  Remarks 


This  subprogram  performs  comparisons  between  logical  variables  containing 
characters;  the  FORTRAN  IV  (H  extended)  compiler  generates  correct  code  for  this 
although  an  error  message  is  generated. 


6.2  AACCRD  - Read  and  Process  Control  Cards 

6.2.1  Identification 
Language:  PARAFOR 

6.2.2  Calling  Sequence 

CALL  AACCRD  (SYSIN,  TMPFIL,  SYSPRT,  ERRPRT,  FINDEX,  CCRDS, 
ACTION,  KMCCRD,  ERRFLG,  MODEL,  NDXFLG) 

602.3  Local  Variable  Dictionary 


NAME 

+ + - 

1 TYPE  1 

DIM 

ARG 

- + - 

1 

FUNCTION 

ACTION  1 

14 

1 KMCCRD 1 

ARG 

1 

ACTION  FOR  CCRD  (1-5) 

CCRDS 

1 

14 

1 KMCCRD 1 

ARG 

1 

CONTROL  CARD  TYPES  (4  CHARACTERS) 

CEFLG 

1 

LI 

1 

| 

1 

ERROR  FLAG  (COMMON  WITH  GDIP) 

CEPRT 

1 

14 

1 

1 

1 

ERROR  OUTPUT  UNIT  (COMMON  WITH  GDIP) 

CSPRT 

| 

14 

1 

1 

1 

SYSTEM  OUTPUT  UNIT  (COMMON  WITH  GDIP) 

CSYSINI 

14 

1 

I 

1 

SYSTEM  INPUT  UNIT  (COMMON  WITH  GDIP) 

DONE 

1 

LI 

1 

I 

| 

FLAG  FOR  LOOP  CONTROL 

END 

1 

14 

1 

1 

1 

CONSTANT  'END  1 

ENDFLGI 

14 

1 

1 

1 

FIRST  3 CHARS  WHILE  LOOKING  FOR  'END' 

EOF 

1 

LI 

| 

1 

1 

FLAG  FOR  LOOP  CONTROL 

ERRFLG 1 

LI 

| 

1 

ARG 

1 

SET  TO  TRUE  WHEN  AN  ERROR  IS  DETECTED 

ERRPRT 1 

14 

1 

I 

ARG 

1 

ERROR  MESSAGE  OUTPUT  UNIT 

FINDEX 1 

14 

1 

1 

ARG 

1 

RUN  INDEX  FILE  I/O  UNIT 

FIRST 

1 

LI 

1 

1 

1 

FLAG  TO  DETECT  FIRST  ENTRY  TO  SUBROUTINE 

IMAGE 

| 

14 

1 

20 

1 

I 

BUFFER  FOR  CONTROL  CARD  (CHARACTER) 

KMCCRD 1 

14 

1 

1 

ARG 

1 

NUMBER  OF  CONTROL  CARDS 

MODEL 

1 

12 

| 

1 

ARG 

1 

MODEL  ID  (2  CHARACTERS) 

NDXFLG 1 

LI 

| 

1 

ARG 

1 

SET  TO  TRUE  WHEN  INDEX  CONTROL  CARD  PROCESSED 

SYSIN 

1 

14 

| 

1 

ARG 

1 

INPUT  UNIT  FOR  CONTROL  CARDS 

SYSPRT 1 

14 

1 

1 

ARG 

1 

OUTPUT  UNIT  FOR  CONTROL  CARD  LISTING 

TMPFIL 1 

14 

| 

1 

ARG 

1 

TEMPORARY  FILE  UNIT  NUMBER  (FOR  CONTROL  CARDS) 

TYPE 

1 

14 

1 

1 

INDEX  INTO  CCRDS  £ ACTION  ARRAYS  (CURRENT) 
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6.2.4  Description 


AACCRD  does  all  processing  of  control  cards  except  for  special  functions.  It  is 
called  with  CCRDS  and  ACTION.  Each  element  of  CCRDS  contains  the  first  four 
characters  of  the  control  card;  the  corresponding  element  of  ACTION  specifies  the 
type  of  action  performed  by  this  routine. 


Action  1 processes  a comment  block.  Action  2 processes  a GDIP  block. 
Action  3 initializes  the  run  index  file.  Action  4 terminates  control  card  processing, 
i.e.,  AACCRD  returns  to  the  calling  program.  Action  5 ignores  the  control  card  to 
permit  later  processing.  MODEL  is  Al  for  the  input  processor  and  AO  for  the  output 
processor. 


6.2.5  PDL 


SUBROUTINE  AACCRD 

< COPY  THE  ARGUMENTS  THAT  GDIP  NEEDS  TO  COMMON 

CSYSIN  * SYSIN 

CSPRT  = SYSPRT 

CEPRT  - ERRPRT 

CEFLG  = ERRFLG 

IF 


> 


FIRST 

THEN 

CALL  AACOPY  <T0  COPY  CONTROL  CARDS  TO  TEMP  FILE> 

ENDIF 

DO 

READ  A CONTROL  CARD 
LIST  THE  CONTROL  CARD 

FIND  INCCRD  SUCH  THAT  CCRDS(INCCRD)  * CURRENT  CONTROL  CARD 
CASE  ACTION (INCCRD)  OF 
1:  < COMMENT  HEADER  > 

DO 

READ  A CARD 
LIST  THE  CARD 


END  CARD  FOUND 
ENDDO 

2:  < DATA  HEADER  > 

CALL  NDBOR  <GDIP> 

3:  < INDEX  HEADER  > 

IF 

NDXFLG 

THEN 

ERROR  * RUN  INDEX  ALREADY  INITIALIZED 
ELSE 
DO 

READ  A CARD 

LIST  IT  ON  THE  CONTROL  CARD  LISTING 

WRITE  IT  INTO  THE  RUN  INDEX  FILE 
UNTIL 

END  CARD  ENCOUNTERED 
ENDDO 

WRITE  TITLES  INTO  RUN  INDEX  FILE 
ENDIF 

<t:  < EOD  CARD  > 

SIMULATE  EOF 

5:  < IGNORE  CONTROL  CARD  FOR  LATER  PROCESSING  > 

ENDCASE 
UNTIL 

END  OF  FILE 
ENDDO 
RETURN 
END 


I 
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6.2.6  Algorithms 


None 

6.2.7  Notes  or  Remarks 


AACCRD  communicates  with  FIERR  via  the  common  block  ERRORS.  This  method 
is  utilized  because  the  GDIP  routines  are  interposed  between  these  routines,  i.e., 

FIERR  is  not  directly  called  by  AACCRD.  The  control  cards  are  copied  to  a temporary 
file  because  GDIP  error  recovery  (via  FIERR)  backspaces  the  file  which  does  not  work 
with  all  possible  input  files,  e.g.,  SYSIN  datasets. 


6.3  AACOPY  - Copy  Card  Images  from  One  File  to  Another 


6.3.1  Identification 


Language:  PARAFOR 


6.3.2  Calling  Sequence 

CALL  AACOPY  (FROM,  TO) 

6.3.3  Local  Variable  Dictionary 


+ + +-■ + 

NAME  I TYPE  I DIM  ! ARG  I FUNCTION 

— — + — — + — — — + — — — — — — — — — — — — — — — — — — — ———  — — — — 

FROM  I 14  6 I ARG  I I/O  UNIT  TO  COPY  CARDS  FROM 

LINE  I 14  I 20  I I BUFFER  FOR  ONE  80  CHARACTER  CARD  IMAGE 

TO  I 14  I I ARG  I I/O  UNIT  TO  COPY  CARDS  TO 

+ + + + 


6.3.4  Description 


All  records  on  the  data  set  reference  number  FROM  to  the  data  set  reference 
number  TO.  The  transfer  is  terminated  by  the  end  of  the  input  data  set. 

6.3.5  PDL 


SUBROUTINE  AACOPY 
DO 

COPY  A CARD  IMAGE 
UNTIL 

END  OF  FILE 
ENDDO 
RETURN 
END 
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6.3.6  Algorithms 


None 

6.3.7  Notes  or  Remarks 


None 


6.4  AADATE  - Get  Current  Date  in  Printable  Format 


6.4.1  Identification 


Language:  PARAFOR 


6.4.2  Calling  Sequence 


CALL  AADATE  (MMDDYY) 


6.4.3  Local  Variable  Dictionary 


NAME  ITYPEI 

DIM 

1 ARG  1 

FUNCTION 

COLON  1 

LI 

1 

1 

1 

CONSTANT  ' : ’ 

DAY  1 

12 

1 

1 

1 

DAY  OF  MONTH 

DIGITS  1 

LI 

1 

10 

1 

1 

CONSTANT  CONTAINING  DIGITS  IN  CHARACTER  FORMAT 

HR  1 

12 

| 

1 

1 

HOUR  OF  DAY 

MIN  1 

12 

1 

1 

1 

MINUTE  OF  HOUR 

MMDDYY 1 

LI 

1 

1A 

1 ARG  1 

RESULT:  'MM/DD/YY  HH : MM' 

MO  1 

12 

1 

1 

1 

MONTH  OF  YEAR 

SEC  1 

12 

1 

1 

1 

SECOND  OF  MINUTE 

SLASH  1 

LI 

1 

1 

1 

CONSTANT  '/' 

SPACE  1 

LI 

1 

1 

1 

CONSTANT  ' ' 

YR  1 

12 

1 

1 

YEAR  OF  CENTURY 

6.4.4  Description 

The  date  and  time  are  returned  in  MMDDYY. 

6.4.5  PDL 


SUBROUTINE  AADATE 

CALL  DAYTIM  TO  GET  THE  CURRENT  DATE 
REFORMAT  IT  INTO  CHARACTER  FORMAT 
RETURN 
END 
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6.4.6  Algorithms 
None 

6.4.7  Notes  or  Remarks 


None 


6.5  AAINDX  - Generate  The  Run  Index  Entries 


6.5.1  Identification 
Language:  FORTRAN 

6.5.2  Calling  Sequence 

CALL  AAINDX  (FINDEX,  ERRPRT,  PARM,  MMDDYY,  LIB,  TYPE,  MEMBER 
WRTFLG,  ERRFLG,  KMFILE) 

6.5.3  Local  Variable  Dictionary 


NAME  1 TYPE  1 

DIM 

+ - 
1 

ARG 

- + ■ 

1 

FUNCTION 

BLANKS  1 

LI 

1 

14 

1 

CONSTANT  14*'  ' 

ERRFLG 1 

LI 

| 

| 

ARG 

1 

SET  TO  TRUE  IF  ERROR  DETECTED 

ERRPRTI 

14 

1 

1 

ARG 

1 

UNIT  FOR  ERROR  MESSAGE 

FINDEXI 

14 

1 

1 

ARG 

1 

I/O  UNIT  FOR  RUN  INDEX  FILE 

FIRST  1 

LI 

| 

8 

1 

1 

FIRST  INDEX  LEVEL  OF  FILE  NAME 

FOURTH  1 

LI 

1 

8 

1 

1 

MEMBER  NAME  OF  FILE  NAME 

KMFILE 1 

14 

1 

1 

ARG 

1 

NUMBER  OF  ENTRIES  TO  WRITE  TO  RUN  INDEX  FILE 

LIB  1 

LI 

1 

8 

1 

ARG 

1 

SECOND  LEVEL  INDEX  FOR  THE  ENTRIES 

1 

MEMBER  1 

14 

1 KMFILE 1 
1 KMFILE 1 

ARG 

1 

1 

(8  CHARACTER) 

PARAMETER  NUMBER  OF  MEMBER  NAME  FOR  EACH  ENTRY 

MMDDYY 1 

LI 

1 

14 

1 

ARG 

1 

DATE  TO  ATTACH  TO  THE  ENTRY  (14  CHARACTERS) 

PARM  1 

14 

1 

1 

ARG 

1 

ADDRESS  OF  PARAMETER  FIELD  FROM  ’EXEC'  CARD 

SECOND  1 

LI 

1 

8 

1 

1 

SECOND  INDEX  LEVEL  OF  FILE  NAME 

THIRD  1 

LI 

1 

8 

1 

1 

THIRD  INDEX  LEVEL  OF  FILE  NAME 

TYPE  1 

LI 

1 

8 

1 

ARG 

1 

THIRD  LEVEL  INDEX  FOR  THE  ENTRIES 

WRTFLG 1 

LI 

1 KMFILE 1 
1 KMFILE 1 

ARG 

1 

(8  CHARACTER) 

IF  FALSE  OMIT  CORRESPONDING  ENTRY 

+ ■ 

+ ■ 

+- 
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6.5.4  Description 


AAINDX  generates  the  entries  for  the  run  index  file.  Each  entry  consists  of  the 
date  and  time  and  a file  name.  Each  element  of  WRTFLG  corresponds  to  a run  index 
entry,  if  FALSE,  the  entry  is  not  output;  if  TRUE,  the  corresponding  elements  of  LIB, 
MEMBER,  and  TYPE,  along  with  MMDDYY  and  FIRST  are  used  to  generate  an  entry  in 
the  file.  All  file  names  are  assumed  to  be  of  the  format:  first,  library  .type  (member). 

PARM  is  returned  from  FASPAR.  AADATE  can  be  used  to  determine  MMDDYY. 

6.5.5  PDL 


SUBROUTINE  AAINDX 
IF 

ERRPRT  - = 0 
THEN 

PRINT  A TITLE  ON  THE  PRINTED  LISTING 
ENDIF 

CALL  AAPNDX  TO  PRINT  THE  LOAD  MODULE  NAME 
FOR 

INFILE  FROM  1 TO  KMFILE 
DO 

IF 

WRTFLG (INFILE) 

THEN 

CALL  AAPNDX  TO  PRINT  THE  INDEX  ENTRY 
ENDIF 
ENDDO 
RETURN 
END 


6.5.6  Algorithms 


None 


6.5.7  Notes  or  Remarks 


The  disposition  of  the  run  index  file  must  be  MOD;  this  is  accomplished  by 
using  DISP  = MOD  in  the  DD  statement  (JCL). 


6.6  AAPNDX  - Print  Run  Index  Entry 


6.6.1  Identification 


Language:  PARAFOR 
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6.6.2  Calling  Sequence 


CALL  AAPNDX  (FINDEX,  SYSPRT,  MMDDYY,  FIRST,  SECOND, 
THIRD,  FOURTH) 

6.6.3  Local  Variable  Dictionary 


NAME  1 TYPE  1 

DIM 

1 

ARG 

1 

FUNCTION 

BLANK  1 

LI 

1 

1 

1 

CONSTANT  ' ' 

DOT  1 

LI 

| 

1 

1 

CONSTANT  ' . ' 

FILNAM 1 

LI 

| 

36 

1 

1 

ASSEMBLED  FILENAME  WITH  BLANKS  COMPRESSED 

FINDEX 1 

IA 

1 

1 

ARG 

1 

I/O  UNIT  FOR  RUN  INDEX  FILE 

FIRST  1 

LI 

| 

8 

1 

ARG 

1 

FIRST  INDEX  LEVEL  OF  FILE  NAME 

FOURTH  1 

LI 

| 

8 

1 

ARG 

1 

MEMBER  NAME  OF  FILE  NAME 

LPARENI 

LI 

1 

1 

1 

CONSTANT  '(' 

MMDDYY 1 

LI 

1 

1A 

| 

ARG 

1 

DATE  TO  ATTACH  TO  THE  ENTRY  (1A  CHARACTERS) 

RPARENI 

LI 

1 

1 

1 

CONSTANT  ' ) ' 

SECOND  1 

LI 

1 

8 

| 

ARG 

1 

SECOND  INDEX  LEVEL  OF  FILE  NAME 

THIRD  1 

LI 

1 

8 

1 

ARG 

1 

THIRD  INDEX  LEVEL  OF  FILE  NAME 

SYSPRT 1 

IA 

1 

1 

ARG 

1 

UNIT  FOR  PRINTED  LISTING 

6.6.4  Description 

One  record  is  written  in  to  the  run  index  file  containing  the  date  (MMDDYY), 
and  the  file  name.  The  file  name  is  the  concatenation  of  FIRST,  SECOND,  THIRD, 
and  FOURTH  with  appropriate  delimiters  and  with  blanks  eliminated.  The  file  name 
is: 

FIRST.  SECOND.  THIRD(FOURTH) 

6.6.5  PDL 


SUBROUTINE  AAPNDX 

FILNAM  = FIRST  II  ' . ' II  SECOND  II  • . » II  THIRD  II  ' ( ' II  FOURTH  I I 
’ ) ’ < WITH  BLANKS  ELIMINATED  > 

WRITE  THE  TIME  AND  FILNAM  INTO  THE  RUN  INDEX  FILE 
IF 

SYSPRT  -*  0 
THEN 

WRITE  THE  TIME  AND  FILENAME  TO  SYSPRT 
ENDIF 
RETURN 
END 


6.6.6  Algorithms 


None 


6.6.7  Notes  or  Remarks 


None 
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6.7  AIGDIP  - Lookup  GDIP  Variable 


6.7.1  Identification 
Language:  ASSEMBLER 

6.7.2  Calling  Sequence 

CALL  GDIP4  (NAME,  FMT,  IRAL,  I RAH,  IRBL,  IRBH,  IRCL,  IRCH,  IRDL, 

IRDH) 

6.7.3  Local  Variable  Dictionary 
None 

6.7.4  Description 

All  GDIP  variables  acceptable  to  the  input  processor  are  defined  here  utilizing 
the  GDIP  macros. 

6.7.5  PPL 
None 

6.7.6  Algorithms 
None 

6.7.7  Notes  or  Remarks 

The  array  maximums  are  included  in  this  routine  as  well  as  the  main  program; 
they  are  in  different  formats. 

6.8  AIINIT  - Read  Structured  Data  File  to  be  Updated 

6.8.1  Identification 
Language:  PARAFOR 

6.8.2  Calling  Sequence 

CALL  AIINIT  (FINIT,  DMND,  DLTIME,  FLTSLT,  FRATE,  GWMILE,  NUMTRP, 
PTHRDM,  PNS,  RRATE,  SMFREQ,  SMST,  STATNS,  SYSTIM,  NOTHRD,  THRIND, 
THRESH,  VINSTA,  VM,  VN,  VOPTIM,  KNDM,  KNREG,  KNSUB,  KNLVL,  KNRD, 
KNFL,  KNDL,  KMDM,  KMREG,  KMSUB,  KMLVL,  KMRD,  KMFL,  KMDL,  SYSPRT) 
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6.8.3  Local  Variable  Dictionary 


NAME 

■ + 

1 TYPE 

+ 

1 DIM 

+ - 

1 

ARG 

+ - 

1 

FUNCTION 

DLTIME 1 

R4 

IKMREG 

1 

ARG 

1 

1 

IKMDM 

1 

1 

VEHICLE  DELAY  TIME  RESULTING  FROM  FAILURES  IN 

1 

1 KMSUB 

1 

1 

EACH  REGION  AND  DEMAND  PERIOD  FOR  EACH 

1 

IKMFL 

1 

1 

SUBSYSTEM  AND  FAILURE  LEVEL 

DMND 

1 

R4 

IKMDM 

1 

ARG 

1 

SYSTEM  DEMAND  IN  EACH  DEMAND  PERIOD 

FLTSLTI 

14 

1 

1 

ARG 

| 

ACTIVE  FLEET  SIZE  (0  - AVERAGE,  1 - MAXIMUM) 

FRATE 

1 

R4 

1 KMSUB 

1 

ARG 

1 

FAILURE  RATES  OF  SYSTEMS  PER  UNIT  TIME  AS 

1 

IKMRD 

1 

1 

FUNCTIONS  OF  DIFFERENT  CAUSAL  FACTORS  FOR  EACH 

1 

1 KMLVL 

1 

1 

LEVEL  OF  RELIABILITY  AND  FAILURE  LEVEL 

1 

IKMFL 

1 

1 

FINIT 

1 

14 

| 

1 

ARG 

1 

I/O  UNIT  WITH  OLD  STRUCTURED  DATA  FILE 

GWMILEI 

R4 

IKMREG 

1 

ARG 

1 

GUIDEUAY  LENGTH  IN  EACH  REGION 

KMDL 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DELAY  THRESHHOLDS 

KMDM 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DEMAND  PERIODS 

KMFL 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  FAILURE  LEVELS 

KMLVL 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  RELIABLILTY  LEVELS 

KMRD 

| 

14 

8 

1 

ARG 

| 

COMPILED  MAXIMUM  NUMBER  OF  CAUSAL  FACTORS 

KMREG 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  REGIONS 

KMSUB 

| 

14 

| 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  SUBSYSTEMS 

KNDL 

1 

14 

1 

1 

ARG 

1 

NUMBER  OF  DELAY  THRESHHOLDS 

KNDM 

1 

14 

1 

1 

ARG 

| 

NUMBER  OF  DEMAND  PERIODS 

KNFL 

1 

14 

| 

1 

ARG 

1 

NUMBER  OF  FAILURE  LEVELS 

KHLVL 

1 

14 

| 

1 

ARG 

1 

NUMBER  OF  RELIABLITY  LEVELS 

KNRD 

1 

14 

1 

| 

ARG 

1 

NUMBER  OF  CAUSAL  FACTORS  ( 5 ) 

KNREG 

1 

14 

1 

1 

ARG 

1 

NUMBER  OF  REGIONS 

KNSUB 

| 

14 

1 

1 

ARG 

1 

NUMBER  OF  SUBSYSTEMS  (4) 

NOTHRDI 

14 

1 

1 

ARG 

1 

NUMBER  OF  THRESHHOLDS 

HUMTRP 1 

R4 

IKMREG 

1 

ARG 

1 

NUMBER  OF  TRIPS  DELAYED  BY  EACH  DELAY  RANGE 

1 

IKMDL 

1 

8 

REGION  AND  DEMAND  PERIOD  RESULTING  IN  EACH 

| 

1 KMSUB 

8 

1 

FAILURE  LEVEL. 

1 

IKMDM 

1 

8 

PTHRDMI 

R4 

8 

1 

ARG 

1 

MINIMUM  PASSENGER  DELAY  THRESHHOLD 

PNS 

1 

R4 

IKMREG 

1 

ARG 

1 

NUMBER  OF  PASSENGERS  LEAVING  STATIONS  IN  EACH 

1 

IKMDM 

1 

1 

REGION  DURING  EACH  DEMAND  INTERVAL 

RRATE 

1 

R4 

1 

I 

ARG 

1 

VEHICLE  REPAIR  RATE  IN  EACH  BAY 

SMFREQ 1 

R4 

1 

1 

ARG 

| 

SCHEDULED  MAINTENANCE  FREQUENCY 

SMST 

1 

R4 

I 

1 

ARG 

1 

SCHEDULED  MAINTENANCE  SERVICE  TIME  PER  VEHICLE 

STATHSI 

14 

IKMREG 

1 

ARG 

9 

NUMBER  OF  STATIONS  IN  EACH  REGION 

SYSPRTI 

14 

1 

1 

ARG 

| 

UNIT  FOR  PRINTING  ERROR  MESSAGES 

SYSTIMI 

R4 

1 KMDM 

| 

ARG 

1 

SYSTEM  OPERATING  TIME  BY  DEMAND  PERIOD 

THRINDI 

R4 

1 

1 

ARG 

| 

THRESHHOLD  INCREMENT 

THRESH  1 

R4 

1 KMDL 

| 

ARG 

1 

THRESHHOLDS 

VINSTA 1 

R4 

1 KMREGI 

ARG 

1 

NUMBER  OF  VEHICLES  THROUGH  STATIONS  IN  EACH 

1 

1 KMDM 

1 

1 

REGION  AND  DEMAND  PERIOD 

VM 

! 

R4 

1 KMREGI 

ARG 

1 

VEHICLE  DISTANCE  IN  EACH  REGION  DURING 

1 

1 KMDM 

1 

1 

EACH  DEMAND  PERIOD 

VN 

1 

R4 

1 KMREGI 

ARG 

1 

AVERAGE  NUMBER  OF  VEHICLES  IN  EACH  REGION 

1 

1 KMDM 

1 

1 

DURING  EACH  DEMAND  PERIOD 

voptimi 

14 

1 KMREGI 

ARG 

1 

TOTAL  VEHICLE  OPERATING  TIME  IN  EACH  REGION 

1 

1 KMDM 

1 

1 

AND  DEMAND  INTERVAL 
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6.8.4  Description 


This  routine  initiaiizies  ail  the  input  variables.  First,  an  attempt  is  made  to 
read  the  structured  data  file  to  be  updated.  If  it  is  null , i ,e. , an  end  of  file  is 
encountered,  the  variables  are  initialized  to  zero. 


6.8.5  PDL 


SUBROUTINE  AIINIT 

SET  ALL  ELEMENTS  OF  NUMTRP  TO  0 
IF 

FILE  TO  BE  UPDATED  IS  NOT  NULL 
THEN 

READ  THE  STRUCTURED  DATA  FILE 
ELSE 

KNREG  = 0 
KMDM  = 0 
KMDL  = 0 
KMFL  = 0 
ENDIF 
RETURN 
END 


6.8.6  Algorithms 


None 


6.8.7  Notes  or  Remarks 


None 


6.9  AINPUT  - Input  Processor  Main  Program 

6.9.1  Identification 
Language:  PARAFOR 

6.9.2  Calling  Sequence 
None;  main  program 
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6.9.3  Local  Variable  Diet i 


on  ary 


NAME 

1 TYPE  1 DIM 

1 

ARG 

1 

FUNCTION 

DLTIMEI 

R4 

1 KMREG 

1 

ARG 

1 

1 

IKMDM 

| 

1 

VEHICLE  DELAY  TIME  RESULTING  FROM  FAILURES  IN 

1 

1 KMSUB 

| 

1 

EACH  REGION  AND  DEMAND  PERIOD  FOR  EACH 

1 

IKMFL 

1 

1 

SUBSYSTEM  AND  FAILURE  LEVEL 

DMND 

1 

R4 

IKMDM 

1 

ARG 

1 

SYSTEM  DEMAND  IN  EACH  DEMAND  PERIOD 

FLTSLTI 

14 

1 

1 

ARG 

1 

ACTIVE  FLEET  SIZE  (0  - AVERAGE,  1 - MAXIMUM) 

FRATE 

1 

R4 

IKMSUB 

1 

ARG 

1 

FAILURE  RATES  OF  SYSTEMS  PER  UNIT  TIME  AS 

1 

IKMRD 

1 

1 

FUNCTIONS  OF  DIFFERENT  CAUSAL  FACTORS  FOR  EACH 

1 

1 KMLVL 

1 

1 

LEVEL  OF  RELIABILITY  AND  FAILURE  LEVEL 

1 

IKMFL 

1 

| 

FINIT 

1 

14 

1 

1 

ARG 

1 

I/O  UNIT  WITH  OLD  STRUCTURED  DATA  FILE 

GWMILEI 

R4 

1 KMREG 

1 

ARG 

1 

GUIDEWAY  LENGTH  IN  EACH  REGION 

KMDL 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DELAY  THRESHHOLDS 

KMDM 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DEMAND  PERIODS 

KMFL 

| 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  FAILURE  LEVELS 

KMLVL 

| 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  RELIABLILTY  LEVELS 

KMRD 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  CAUSAL  FACTORS 

KMREG 

| 

14 

| 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  REGIONS 

KMSUB 

1 

14 

| 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  SUBSYSTEMS 

KNDL 

1 

14 

1 

1 

ARG 

1 

NUMBER  OF  DELAY  THRESHHOLDS 

KNDM 

| 

14 

1 

1 

ARG 

1 

NUMBER  OF  DEMAND  PERIODS 

KNFL 

1 

14 

1 

1 

ARG 

1 

NUMBER  OF  FAILURE  LEVELS 

KNLVL 

| 

14 

1 

1 

ARG 

1 

NUMBER  OF  RELIABLITY  LEVELS 

KNRD 

1 

14 

1 

1 

ARG 

1 

NUMBER  OF  CAUSAL  FACTORS  (5) 

KNREG 

| 

14 

1 

1 

ARG 

1 

NUMBER  OF  REGIONS 

KNSUB 

1 

14 

1 

I 

ARG 

1 

NUMBER  OF  SUBSYSTEMS  (4) 

NOTHRDI 

14 

1 

1 

ARG 

1 

NUMBER  OF  THRESHHOLDS 

NUMTRPI 

R4 

1 KMREG 

1 

ARG 

1 

NUMBER  OF  TRIPS  DELAYED  BY  EACH  DELAY  RANGE 

| 

IKMDL 

| 

1 

REGION  AND  DEMAND  PERIOD  RESULTING  IN  EACH 

1 

IKMSUB 

1 

1 

FAILURE  LEVEL. 

| 

IKMDM 

1 

1 

PTHRDMI 

R4 

1 

1 

ARG 

1 

MINIMUM  PASSENGER  DELAY  THRESHHOLD 

PNS 

1 

R4 

1 KMREG 

1 

ARG 

1 

NUMBER  OF  PASSENGERS  LEAVING  STATIONS  IN  EACH 

1 

IKMDM 

1 

| 

REGION  DURING  EACH  DEMAND  INTERVAL 

RRATE 

1 

R4 

1 

| 

ARG 

1 

VEHICLE  REPAIR  RATE  IN  EACH  BAY 

SMFREQI 

R4 

1 

1 

ARG 

1 

SCHEDULED  MAINTENANCE  FREQUENCY 

SMST 

1 

R4 

1 

1 

ARG 

1 

SCHEDULED  MAINTENANCE  SERVICE  TIME  PER  VEHICLE 

STATNSI 

14 

1 KMREG 

1 

ARG 

1 

NUMBER  OF  STATIONS  IN  EACH  REGION 

SYSPRTI 

14 

1 

I 

ARG 

| 

UNIT  FOR  PRINTING  ERROR  MESSAGES 

SYSTIM1 

R4 

1 KMDM 

1 

ARG 

1 

SYSTEM  OPERATING  TIME  BY  DEMAND  PERIOD 

THRINDI 

R4 

| 

1 

ARG 

| 

THRESHHOLD  INCREMENT 

THRESH  1 

R4 

1 KMDL 

1 

ARG 

| 

THRESHHOLDS 

VINSTA 1 

R4 

1 KMREG 1 

ARG 

| 

NUMBER  OF  VEHICLES  THROUGH  STATIONS  IN  EACH 

1 

1 KMDM 

1 

I 

REGION  AND  DEMAND  PERIOD 

VM 

1 

R4 

1 KMREG 1 

ARG 

1 

VEHICLE  DISTANCE  IN  EACH  REGION  DURING 

1 

1 KMDM 

1 

1 

EACH  DEMAND  PERIOD 

VN 

1 

R4 

1 KMREG 1 

ARG 

1 

AVERAGE  NUMBER  OF  VEHICLES  IN  EACH  REGION 

1 

1 KMDM 

1 

1 

DURING  EACH  DEMAND  PERIOD 

VOPTIMI 

14 

1 KMREG 1 

ARG 

1 

TOTAL  VEHICLE  OPERATING  TIME  IN  EACH  REGION 

1 

1 KMDM 

1 

1 

AND  DEMAND  INTERVAL 

NAME  TYPE  DIM  ARG  FUNCTION 
INDL  14 

IN  DM  14 

INFL  14 

INREG  14 
INSUB  14 


Index  specifying  delay  threshhold 
Index  specifying  demand  period 
Index  specifying  failure  level 
Index  specifying  repair 
Index  specifying  subsystem 

1 - vehicle 

2 - stations 

3 - guideways 

4 - central  management 
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NAME 

TYPE 

DIM 

ARG  FUNCTION 

ON 

14 

Constant  'ON' 

LIB 

R8 

2 

Run  index  entry  library  name  (8  characters) 

PARM 

14 

Address  of  parameter  list  from  EXEC 

TYPE 

R8 

2 

Run  index  entry  type  name  (8  characters) 

DEBUG 

!4 

I/O  unit  for  raw  statistics 

STRUC 

14 

I/O  unit  with  structured  data 

ERRFLG 

LI 

Error  flag  - set  to  true  by  any  error 

ERRPRT 

14 

I/O  unit  to  receive  error  messages 

FINDEX 

14 

I/O  unit  of  run  index  file 

MEMBER 

14 

2 

Index  to  parameter  list  for  run  index  entries 

MMDDYY  12 

7 

Date  in  character  format 

MODULE 

R8 

Load  module  name 

WRTFLG 

LI 

2 

Flag  to  write 

CCRDS 

14 

6 

Control  card  names  (4  characters) 

FDLTI 

14 

Unit  for  vehicle  delay  time  report 

FNTRP 

14 

Unit  for  number  of  trips  delayed  report  (0  - omit 
report) 

MODEL 

12 

Model  id:  constant  ' A I1 

SYSIN 

14 

Unit  for  run  time  inputs 

ACTION 

14 

6 

Type  of  processing  for  the  control  cards  described 
in  CCRDS 

FSUBSR 

14 

Unit  for  subsystem  reliability  report  (0  - omit  report) 

NDXFLG 

LI 

Not  used  (parameter) 

TMPFIL 

14 

Unit  with  scratch  file 

EOD 

14 

Constant  'EOD'  equivalenced  to  CCRDS  (1) 

FAIL 

14 

Constant  'FAIL'  equivalenced  to  CCRDS  (8) 

FSUMY 

14 

I/O  unit  for  input  summary  report 

CTLCRD 

14 

Type  of  current  control  card 

DBGFLG 

14 

2 

Debug  parameter  from  EXEC 

FFAILD 

14 

I/O  unit  with  failure  trip  logs 

FUNFAL 

14 

I/O  unit  with  reference  trip  log 

INFILE 

14 

Index  of  current  failure  trip  log 

NOFAIL 

12 

KMREG 

KMDM 

KMFL 

Number  of  trip  logs  processed  into  the  corresponding 
elements  of  NUMTRP 

UNMTCH 

14 

Number  of  unmatched  trips 

6.9.4  Description 


This  is  the  main  program  of  the  input  processor.  The  description  of  the  input 
processor  is  in  Section  2.1  . 
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6.9,5  PDL 


DECODE  DEBUG  FLAG 

PRINT  TITLE  ON  CONTROL  CARD  LISTING 
SET  ALL  ELEMENTS  OF  NOFAIL  TO  0 
CALL  AIINIT  < INITIALIZATION  > 

CALL  AACCRD  <READ  L PROCESS  CONTROL  CARDS> 

IF 

- NDXFLG 
THEN 

ERROR  NO  RUN  INDEX  CARD 

ENDIF 

IF 

- ERRFLG 
THEN 

FOR 

INDL  FROM  1 TO  KNDL 
DO 

THRESH(INDL)  = PTHRDM  ♦ THRIND  * INDL 
ENDDO 
IF 

- ERRFLG 
THEN 
DO 

READ  A CONTROL  CARD 
IF 

IT  IS  A FAILURE  CONTROL  CARD 
THEN 

VALIDATE  THE  CONTROL  CARD  PARAMETERS 
IF 

NOFAII/CINREG,  INDM,  INSUB,  INFL)  = 0 
THEN 

CLEAR  NUMTRPCINREG,  INDM,  *,  INSUB,  INFL)  TO  ZERO 
ENDIF 
UNMTCH  = 0 

NOFAIL(INREG,  INDM,  INSUB,  INFL)  = 

NOFAILdNREG,  INDM,  INSUB,  INFL)  + 1 
CALL  AINUMT  < PROCESS  A TRIPLOG  > 

WRITE  THE  NUMBER  OF  UNMATCHED  TRIPS 
ENDIF 
UNTIL 

END  OF  FILE 
ENDDO 
ENDIF 


FOR 

INFL  FROM  1 TO  KNFL 
DO 

FOR 

INSUB  FROM  1 TO  KNSUB 
DO 

FOR 

INDM  FROM  1 TO  KNDM 
DO 

FOR 

INREG  FROM  1 TO  KNREG 


NOFAILdNREG,  INDM,  INSUB,  INFL)  > 0 
THEN 
FOR 

INDL  FROM  1 TO  KNDL 


DO 

NUMTRPCINREG, 

NUMTRPCINREG 

NOFAILdNREG 


INDM,  INDL,  INSUB,  INFL)  = 

, INDM,  INDL,  INSUB,  INFL)  / 
, INDM,  INSUB,  INFL) 


ENDDO 

ENDIF 

ENDDO 

ENDDO 

ENDDO 

ENDDO 

ENDIF 

IF 

- ERR  FLG 


THEN 

WRITE  A NEW  STRUCTURED  DATA  FILE 


ENDIF 

IF 


NDX  FLG 
THEN 

CALL  AAINDX  <WRITE  THE  RUN  INDEX  ENTRIES> 
ENDIF 

CALL  AIRPTS  <PRINT  THE  REPORTS> 


STOP 

END 
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6.9.6 


Algorithms 


None 

6.9.7  Notes  or  Remarks 

The  input  processor  accepts  the  parameter  from  the  PARM  = field,  the 
format  of  the  parameter  is 

load  module,  run- index,  prog- lib,  prog-pro},  data-proj,struc,  debug 

where 


load  module 
run  index 

prog-lib 

prog-proj 

data-proj 

struc 

debug 


is  the  name  of  the  load  module  used  for  this  execution 
is  the  distinguishing  characters  of  the  run  index  file  (the  last 
7 characters  of  the  third  index  level  of  the  file  name) 
is  the  second-level  of  the  STEPLIB  file  name 
is  the  first-level  of  the  STEPLIB  file  name 
is  the  first-level  of  all  data  files 
is  the  structure  data  file  member  name 
is  used  to  turn  on  debugging  output  (see  section  4,0) 


6.10  AINUMT  - Process  a Trip  log  to  Find  Number  of  Trips  Delayed 
6.10.1  Identification 


Language:  PARAFOR 

6.10.2  Calling  Sequence 

CALL  AINUMT  (FUNFAL,  FFAILD,  NUMTRP,  INFILE,  INREG,  IN  DM, 
INSUB,  INFL,  KNDL,  KMREG,  KMDM,  KMDL,  KMSUB,  KMFL,  ERRPRT,  ERRFLG, 
UNMTCH,  PTHRDM,  THRESH,  DEBUG) 
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6.10.3  Local  Variable  Dictionary 


NAME  1 TYPE  1 

DIM 

1 

ARG 

1 

FUNCTION 

DEBUG  1 

14 

1 

ARG 

1 

UNIT  TO  CONTAIN  DEBUG  OUTPUT  (0  TO  DISABLE) 

DELAY  1 

R4 

1 

1 

| 

DELAY  TIME  FOR  THE  CURRENT  TRIP 

ERRFLGI 

LI 

1 

1 

ARG 

| 

SET  TO  TRUE  WHEN  AN  ERROR  HAS  BEEN  DETECTED 

ERRPRTI 

14 

| 

1 

ARG 

1 

UNIT  FOR  ERROR  MESSAGES 

FDESTSI 

14 

| 

I 

1 

DESTINATION  STATION  (FAILED  TRIPLOG) 

FFAILDI 

14 

1 

1 

ARG 

1 

UNIT  CONTAINING  THE  FAILED  TRIPLOG 

FNOPNSI 

14 

1 

1 

1 

NUMBER  OF  PASSENGERS  (FAILED  TRIPLOG) 

FORIGSI 

14 

1 

1 

1 

ORIGIN  STATION  (FAILED  TRIPLOG) 

FSTRTTI 

R4 

1 

1 

1 

TRIP  START  TIME  (FAILED  TRIPLOG) 

FTERMTI 

R4 

1 

1 

1 

TRIP  TERMINATION  TIME  (FAILED  TRIPLOG) 

FUNFALI 

14 

1 

1 

ARG 

1 

UNIT  CONTAINING  THE  UNFAILED  TRIPLOG 

INDM  1 

14 

1 

1 

ARG 

1 

DEMAND  INTERVAL  CONTAINING  FAILURE 

INFILE  1 

14 

1 

1 

ARG 

| 

FILE  NUMBER  OF  FAILED  TRIPLOG 

INFL  1 

14 

1 

I 

ARG 

1 

DEGREE  OF  FAILURE  IN  FAILED  TRIPLOG 

INREG  1 

14 

1 

1 

ARG 

1 

REGION  CONTAINING  FAILURE 

INSUB  1 

14 

1 

1 

ARG 

1 

SUBSYSTEM  WHICH  FAILED 

KMDL  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DELAY  THRESHHOLDS 

KMDM  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DEMAND  PERIODS 

KMFL  1 

14 

| 

1 

ARG 

| 

COMPILED  MAXIMUM  NUMBER  OF  FAILURE  LEVELS 

KMREG  1 

14 

| 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  REGIONS 

KMSUB  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  SUBSYSTEMS 

KNDL  1 

14 

| 

1 

ARG 

| 

NUMBER  OF  DELAY  THRESHHOLDS 

KNFILEI 

14 

1 

1 

ARG 

1 

NUMBER  OF  LAST  FILE  PROCESSED 

NUMTRP 1 

1 

R4 

1 KMREG 
1 KMDM 

1 

ARG 

1 

NUMBER  OF  TRIPS  DELAYED  BY  FAILURES 

1 

1 KMDL 

1 

1 

1 

1 KMSUB 

1 

1 

1 

1 KMFL 

1 

1 

PTHRDMI 

R4 

1 

1 

ARG 

| 

MINIMUM  PASSENGER  DELAY  THRESHHOLD 

THRESH  1 

R4 

| 

KMDL 

J 

ARG 

1 

THRESHHOLDS 

UDEST  1 

14 

1 

1 

1 

DESTINATION  STATION  (UNFAILED  TRIPLOG) 

UNMTCHI 

14 

| 

1 

ARG 

1 

NUMBER  OF  UNMATCHED  TRIPS 

UNOPNSI 

14 

| 

1 

1 

NUMBER  OF  PASSENGERS  (UNFAILED  TRIPLOG) 

UORIGSI 

14 

| 

1 

1 

ORIGIN  STATION  (UNFAILED  TRIPLOG) 

USTRTTI 

R4 

I 

I 

| 

TRIP  START  TIME  (UNFAILED  TRIPLOG) 

UTERMTI 

R4 

1 

1 

TRIP  TERMINATION  TIME  (UNFAILED  TRIPLOG) 

6.10.4  Description 


This  routine  computes  the  number  of  passengers  delayed  for  a particular 
failure  (but  several  delay  thresholds)  by  comparing  two  trip  logs.  Both  trip  logs  must 
be  sorted  (Section  2.1). 
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6,10.5  PDL 


SUBROUTINE  AIHUtIT 

REWIND  UNFAILED  TRIPLOG 

VALIDATE  INDICES  INTO  NUMTRP 

VERIFY  THAT  THE  NEXT  FILE  IS  TO  BE  PROCESSED 

KNFILE  =INFILE 

< THE  FOLLOWING  IS  THE  STANDARD  METHOD  OF  UPDATING  A MASTER  FILE  > 

READ  A TRIP  FROM  THE  UNFAILED  TRIPLOG 
READ  A TRIP  FROM  THE  FAILED  TRIPLOG 
DO 

IF 

FAILED  TRIP  START  TIME  IS  LATER  THAN  THE  UNFAILED  TRIP 
THEN 

READ  A TRIP  FROM  THE  UNFAILED  TRIPLOG 
UNMTCH  = UNMTCH  + 1 
ELSE 
IF 

THE  FAILED  AND  UNFAILED  TRIPS  ARE  NOT  THE  SAME  TRIP 
THEN 

READ  A TRIP  FROM  THE  FAILED  TRIPLOG 
ELSE 

DELAY  = MAX  CO,  FTERMT  - UTERMT)  /60 
INDL  = 0 
IF 

DELAY  > PTHRDM 
THEN 
DO 

INDL  = INDL  + 1 
UNTIL 

DELAY  <=  THRESHCINDL)  I 
INDL  = KNDL 
ENDDO 

NUMTRP ( INREG , INDM,  INDL,  INSUB,  INFL ) = 

NUMTRP CINREG,  INDM,  INDL,  INSUB,  INFL)  + 1 
ENDIF 

READ  A TRIP  FROM  TNE  UNFAILED  TRIPLOG 
READ  A TRIP  FROM  THE  FAILED  TRIPLOG 
ENDIF 
ENDIF 
UNTIL 

END  OF  FILE  ON  EITHER  FILE 
ENDDO 
IF 

END  OF  FILE  ON  FAILED  TRIP  LOG 
THEN 

COUNT  REMAINING  TRIPS  IN  UNFAILED  TRIPLOGS  AS  UNMATCHED  (UNMTCH) 
ELSE 

READ  REMAINING  TRIPS  FROM  FAILED  TRIPLOG  <TO  POSITION  THE  FILE> 
ENDIF 
RETURN 
END 


6.10.6  Algorithms 


None 
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6.10.7  Notes  or  Remarks 


The  unit  containing  the  failed  trip  logs  is  a concatenation  of  all  the  failed 
trip  logs  to  be  processed;  each  call  to  AINUMT  processes  the  next  trip  log.  An  end 
of  file  separates  the  trip  logs.  Upon  return  from  this  routine,  the  failed  trip  log  is 
positioned  at  the  beginning  of  the  next  trip  log. 


6.11  AlOUT  - Write  the  Structured  Data  File 
6.11.1  Identification 


Language:  PARAFOR 


6.11.2  Calling  Sequence 


CALL  AlOUT  (STRUC,  DMND,  DLTIME,  FLTSLT,  FRATE,  GWMILE,  NUMTRP, 
PTHRDM,  PNS,  RRATE,  SMFREQ,  SMST,  STATNS,  SYSTIM,  NOTHRD,  THRIND, 
THRESH,  VINSTA,  VM,  VN,  VOPTIM,  KNDM,  KNREG,  KNSUB,  KNLVL,  KNRD, 
KNFL,  KNDL,  KNDM,  KMREG,  KMSUB,  KMLVL,  KMRD,  KMFL,  KMDL) 
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6.11.3  Local  Variable  Dictionary 


+ ■ 

NAME  1 TYPE  1 DIM 

ARG 

1 

FUNCTION 

DLTIME  8 

R4 

1 KMREG 

1 

ARG 

1 

1 

8 KMDM 

1 

8 

VEHICLE  DELAY  TIME  RESULTING  FROM  FAILURES  IN 

1 

i KMSUB 

1 

8 

EACH  REGION  AND  DEMAND  PERIOD  FOR  EACH 

8 

8 KMFL 

1 

f 

SUBSYSTEM  AND  FAILURE  LEVEL 

DMND  1 

R4 

8 KMDM 

| 

ARG 

1 

SYSTEM  DEMAND  IN  EACH  DEMAND  PERIOD 

FLTSLTI 

14 

1 

1 

ARG 

I 

ACTIVE  FLEET  SIZE  (0  - AVERAGE,  1 - MAXIMUM) 

FRATE  1 

R4 

1 KMSUB 

I 

ARG 

1 

FAILURE  RATES  OF  SYSTEMS  PER  UNIT  TIME  AS 

8 

1 KMRD 

1 

8 

FUNCTIONS  OF  DIFFERENT  CAUSAL  FACTORS  FOR  EACH 

8 

! KMLVL 

1 

8 

LEVEL  OF  RELIABILITY  AND  FAILURE  LEVEL 

8 

8 KMFL 

0 

1 

GWMILEI 

R4 

1 KMREG 

i 

ARG 

8 

GUIDEWAY  LENGTH  IN  EACH  REGION 

KMDL  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DELAY  THRESHHOLDS 

KMDM  1 

14 

1 

1 

ARG 

I 

COMPILED  MAXIMUM  NUMBER  OF  DEMAND  PERIODS 

KMFL  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  FAILURE  LEVELS 

KMLVL  1 

14 

8 

| 

ARG 

8 

COMPILED  MAXIMUM  NUMBER  OF  RELIABLILTY  LEVELS 

KMRD  1 

14 

1 

| 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  CAUSAL  FACTORS 

KMREG  1 

14 

1 

I 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  REGIONS 

KMSUB  ! 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  SUBSYSTEMS 

KNDL  I 

14 

I 

1 

ARG 

1 

NUMBER  OF  DELAY  THRESHHOLDS 

KNDtl  8 

14 

g 

1 

ARG 

1 

NUMBER  OF  DEMAND  PERIODS 

KNFL  I 

14 

1 

i 

ARG 

8 

NUMBER  OF  FAILURE  LEVELS 

KNLVL  1 

14 

8 

] 

ARG 

8 

NUMBER  OF  RELIABLITY  LEVELS 

KNRD  1 

14 

8 

1 

ARG 

| 

NUMBER  OF  CAUSAL  FACTORS  (5) 

KNREG  1 

14 

8 

8 

ARG 

| 

NUMBER  OF  REGIONS 

KNSUB  I 

14 

1 

1 

ARG 

I 

NUMBER  OF  SUBSYSTEMS  (4) 

HOTHRDI 

14 

8 

1 

ARG 

8 

NUMBER  OF  THRESHHOLDS 

NUMTRP 1 

R4 

1 KMREG 

| 

ARG 

8 

NUMBER  OF  TRIPS  DELAYED  BY  EACH  DELAY  RANGE 

g 

IKMDL 

i 

8 

REGION  AND  DEMAND  PERIOD  RESULTING  IN  EACH 

I 

1 KMSUB 

i 

1 

FAILURE  LEVEL, 

! 

8 KMDM 

I 

8 

PTHRDMI 

R4 

8 

8 

ARG 

0 

MINIMUM  PASSENGER  DELAY  THRESHHOLD 

PNS  1 

R4 

I KMREG 

8 

ARG 

| 

NUMBER  OF  PASSENGERS  LEAVING  STATIONS  IN  EACH 

1 

IKMDM 

8 

1 

REGION  DURING  EACH  DEMAND  INTERVAL 

RRATE  1 

R4 

1 

1 

ARG 

1 

VEHICLE  REPAIR  RATE  IN  EACH  BAY 

SMFREQI 

R4 

1 

1 

ARG 

1 

SCHEDULED  MAINTENANCE  FREQUENCY 

SMST  1 

R4 

1 

1 

ARG 

| 

SCHEDULED  MAINTENANCE  SERVICE  TIME  PER  VEHICLE 

STATNSI 

14 

1 KMREG 

| 

ARG 

8 

NUMBER  OF  STATIONS  IN  EACH  REGION 

STRUC  1 

14 

8 

S 

ARG 

1 

I/O  UNIT  WITH  NEW  STRUCTURED  DATA  FILE 

SYSTIMI 

R4 

0 KMDM 

i 

ARG 

9 

SYSTEM  OPERATING  TIME  BY  DEMAND  PERIOD 

THRINDI 

R4 

8 

1 

ARG 

8 

THRESHHOLD  INCREMENT 

THRESH  1 

R4 

8 KMDL 

1 

ARG 

| 

THRESHHOLDS 

VIHSTA 1 

R4 

1 KMREG 1 

ARG 

i 

NUMBER  OF  VEHICLES  THROUGH  STATIONS  IN  EACH 

1 

1 KMDM 

8 

1 

REGION  AND  DEMAND  PERIOD 

VM  1 

R4 

1 KMREG 1 

ARG 

1 

VEHICLE  DISTANCE  IN  EACH  REGION  DURING 

1 

VH  1 

8 

1 KMDM 

1 

8 

EACH  DEMAND  PERIOD 

R4 

1 KMREG 8 

ARG 

8 

AVERAGE  NUMBER  OF  VEHICLES  IN  EACH  REGION 

1 KMDM 

8 

8 

DURING  EACH  DEMAND  PERIOD 

VOPTIM8 

14 

8 KMREG 8 

ARG 

8 

TOTAL  VEHICLE  OPERATING  TIME  IN  EACH  REGION 

8 

8 KMDM 

1 

AND  DEMAND  INTERVAL 
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6.11.4  Description 

This  routine  writes  the  entire  structured  data  files  from  its  parameters. 

6.11.5  PPL 

SUBROUTINE  AIOUT 

WRITE  THE  STRUCTURED  DATA  FILE 
RETURN 
END 

6.11.6  Algorithms 
None 

6.11.7  Notes  or  Remarks 


The  entire  main  section  of  code  is  included  from  AFSTRC;  it  is  shared  with  in- 
model processor  so  that  any  change  to  the  structured  data  file  changes  both  the  input 
and  the  model  processor  code.  If  the  file  structure  is  modified,  the  version  number  in 
AFSTRC  should  be  incremented.  The  statements  starting  with  % are  PL/l  preprocessor 
statements  that  permit  this  sharing  of  code. 


6.12  AIRPTS  - Write  the  Reports 

6.12.1  Identification 
Language:  PARAFOR 

6.12.2  Calling  Sequence 

CALL  AIRPTS  (FSUMY,  FSUBSR,  FNTRP,  FDLTI,  FRATE,  RRATE,  SMFREQ, 
SMST,  FLTSLT,  GWMILE,  PNS,  STATNS,  DMND,  VOPTIM,  SYSTIM,  VINSTA,  VM, 
VN,  NUMTRP,  THRESH,  KMLVL,  KMREG,  KMDM,  KMSUB,  KMFL,  KMRD,  KMDL) 


6-20 


6.12.3  Local  Variable  Dictionary 


NAME  1 TYPE  1 DIM 

1 

ARG 

1 

FUNCTION 

DLTIMEI 

R4 

1 KMREG 

1 

ARG 

1 

1 

1 KNDM 

1 

1 

VEHICLE  DELAY  TIME  RESULTING  FROM  FAILURES  IN 

1 

1 KMSUB 

1 

1 

EACH  REGION  AND  DEMAND  PERIOD  FOR  EACH 

| 

1 KMFL 

1 

1 

SUBSYSTEM  AND  FAILURE  LEVEL 

DMND  1 

R4 

IKMDM 

1 

ARG 

1 

SYSTEM  DEMAND  IN  EACH  DEMAND  PERIOD 

FDLTI  1 

14 

1 

1 

ARG 

1 

I/O  UNIT  FOR  DELAY  TIME  REPORT 

FLTSLTI 

14 

1 

1 

ARG 

1 

ACTIVE  FLEET  SIZE  (0  - AVERAGE,  1 - MAXIMUM) 

FNTRP  1 

14 

1 

1 

ARG 

1 

I/O  UNIT  FOR  NUMBER  OF  TRIPS  DELAYED  REPORT 

FRATE  1 

R4 

1 KMSUB 

1 

ARG 

1 

FAILURE  RATES  OF  SYSTEMS  PER  UNIT  TIME  AS 

1 

IKMRD 

1 

1 

FUNCTIONS  OF  DIFFERENT  CAUSAL  FACTORS  FOR  EACH 

| 

IKMLVL 

1 

1 

LEVEL  OF  RELIABILITY  AND  FAILURE  LEVEL 

1 

IKMFL 

1 

1 

FSUBSRI 

14 

1 

1 

ARG 

1 

I/O  UNIT  FOR  FAILURE  RATES  REPORT 

FSUMY  1 

14 

1 

1 

ARG 

1 

I/O  UNIT  FOR  INPUT  SUMMARY  FILE 

GUMILEI 

R4 

1 KMREG 

1 

ARG 

1 

GUIDEWAY  LENGTH  IN  EACH  REGION 

KMDL  1 

14 

1 

1 

ARG 

| 

COMPILED  MAXIMUM  NUMBER  OF  DELAY  THRESHHOLDS 

KMDM  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DEMAND  PERIODS 

KMFL  1 

14 

1 

| 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  FAILURE  LEVELS 

KMLVL  1 

14 

1 

| 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  RELIABLILTY  LEVELS 

KMRD  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  CAUSAL  FACTORS 

KMREG  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  REGIONS 

KMSUB  1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  SUBSYSTEMS 

KNDL  1 

14 

1 

1 

ARG 

1 

NUMBER  OF  DELAY  THRESHHOLDS 

KNDM  1 

14 

I 

1 

ARG 

| 

NUMBER  OF  DEMAND  PERIODS 

KHFL  1 

14 

1 

1 

ARG 

1 

NUMBER  OF  FAILURE  LEVELS 

KNLVL  1 

14 

1 

1 

ARG 

1 

NUMBER  OF  RELIABLITY  LEVELS 

KNRD  1 

14 

1 

1 

ARG 

1 

NUMBER  OF  CAUSAL  FACTORS  (5) 

KNREG  1 

14 

1 

1 

ARG 

1 

NUMBER  OF  REGIONS 

KHSUB  1 

14 

1 

1 

ARG 

1 

NUMBER  OF  SUBSYSTEMS  (4) 

HUHTRP 1 

R4 

1 KMREG 

1 

ARG 

1 

NUMBER  OF  TRIPS  DELAYED  BY  EACH  DELAY  RANGE 

1 

IKMDL 

1 

1 

REGION  AND  DEMAND  PERIOD  RESULTING  IN  EACH 

1 

1 KMSUB 

1 

1 

FAILURE  LEVEL. 

| 

IKMDM 

| 

| 

PNS  1 

R4 

1 KMREG 

| 

ARG 

1 

NUMBER  OF  PASSENGERS  LEAVING  STATIONS  IN  EACH 

| 

IKMDM 

1 

1 

REGION  DURING  EACH  DEMAND  INTERVAL 

RRATE  1 

R4 

1 

1 

ARG 

1 

VEHICLE  REPAIR  RATE  IN  EACH  BAY 

SMFREQ 1 

R4 

1 

1 

ARG 

1 

SCHEDULED  MAINTENANCE  FREQUENCY 

SMST  1 

R4 

1 

1 

ARG 

1 

SCHEDULED  MAINTENANCE  SERVICE  TIME  PER  VEHICLE 

STATNSI 

14 

1 KMREG 

1 

ARG 

1 

NUMBER  OF  STATIONS  IN  EACH  REGION 

SYSTIMI 

R4 

1 KMDM 

1 

ARG 

1 

SYSTEM  OPERATING  TIME  BY  DEMAND  PERIOD 

THRESH  1 

R4 

1 KMDL 

| 

ARG 

1 

THRESHHOLDS 

VIHSTA 1 

R4 

1 KMREG 1 

ARG 

| 

NUMBER  OF  VEHICLES  THROUGH  STATIONS  IN  EACH 

| 

1 KMDM 

| 

1 

REGION  AND  DEMAND  PERIOD 

vn  i 

R4 

1 KMREG 1 

ARG 

1 

VEHICLE  DISTANCE  IN  EACH  REGION  DURING 

i 

1 KMDM 

1 

1 

EACH  DEMAND  PERIOD 

VN  1 

R4 

1 KMREG 1 

ARG 

1 

AVERAGE  NUMBER  OF  VEHICLES  IN  EACH  REGION 

1 

1 KMDM 

1 

1 

DURING  EACH  DEMAND  PERIOD 

VOPTIMI 

14 

1 KMREG 1 

ARG 

1 

TOTAL  VEHICLE  OPERATING  TIME  IN  EACH  REGION 

1 

1 KMDM 

1 

1 

AND  DEMAND  INTERVAL 
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6.12.4  Descript- ion 


This  routine  produces  all  the  reports  by  calling  the  appropriate  subprograms. 


6.12.5  PDL 


SUBROUTINE  AIRPTS 

CALL  AISUMY  <PRINT  INPUT  SUMMARY  REPORT> 

CALL  AONUMT  <PRINT  NUMBER  OF  TRIPS  DELAYED  REPORT> 
CALL  AODLTI  <PRINT  VEHICLE  DELAY  TIME  REPORT> 
RETURN 
END 


6.12.6  Algorithms 


None 


6.12.7  Notes  or  Remarks 


None 


6.13  AISBSR  - Print  the  Subsystem  Failure  Rates 

6.13.1  Identification 
Language:  PARAFOR 

6.13.2  Calling  Sequence 

CALL  AISBSR  (FSUBSR,  FRATE,  KNLVL,  KNSUB,  KNFL,  KNRD,  KMLVL, 
KMSUB,  KMFL,  KMRD) 
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6.13.3  Local  Variable  Dictionary 


NAME 

ITYPE 

1 DIM 

1 

ARG 

1 FUNCTION 

DAY 

1 

12 

1 

1 DAY  OF  MONTH  - FOR  THE  TITLE 

FRATE 

1 

R4 

1 KMSUB 

1 

ARG 

1 FAILURE  RATES  OF  SYSTEMS  PER  UNIT  TIME  AS 

1 

1 

1 

FSUBSR 1 

I* 

IKMRD 
IKMLVL 
1 KMFL 
1 

1 

1 

1 

1 

ARG 

1 FUNCTIONS  OF  DIFFERENT  CAUSAL  FACTORS  FOR  EACH 
1 LEVEL  OF  RELIABILITY  AND  FAILURE  LEVEL 
1 

1 I/O  UNIT  FOR  FAILURE  RATES  REPORT 

HR 

1 

12 

1 

1 

1 DUMMY  ARGUMENT 

KMFL 

1 

14 

1 

1 

ARG 

1 COMPILED  MAXIMUM  NUMBER  OF  FAILURE  LEVELS 

KMLVL 

1 

It 

1 

I 

ARG 

1 COMPILED  MAXIMUM  NUMBER  OF  RELIABLILTY  LEVELS 

KMRD 

1 

14 

1 

1 

ARG 

1 COMPILED  MAXIMUM  NUMBER  OF  CAUSAL  FACTORS 

KMSUB 

| 

14 

1 

1 

ARG 

1 COMPILED  MAXIMUM  NUMBER  OF  SUBSYSTEMS 

KNFL 

| 

14 

1 

1 

ARG 

1 NUMBER  OF  FAILURE  LEVELS 

KNLVL 

1 

14 

1 

1 

ARG 

1 NUMBER  OF  RELIABLITY  LEVELS 

KNRD 

| 

14 

1 

1 

ARG 

1 NUMBER  OF  CAUSAL  FACTORS  (5) 

KNSUB 

1 

14 

1 

1 

ARG 

1 NUMBER  OF  SUBSYSTEMS  (4) 

MIN 

1 

12 

1 

1 

1 DUMMY  ARGUMENT 

MO 

1 

12 

1 

1 

1 MONTH  OF  YEAR  - FOR  THE  TITLE 

SUBSYSI 

R8 

1 4 

1 

1 CONSTANT  - COLUMN  TITLES  FOR  THE  REPORT 

YR 

1 

12 

1 

1 

1 YEAR  OF  CENTURY  - FOR  THE  TITLE 

6.13.4  Description 

The  subsystem  failure  rate  report  is  formatted  and  written. 

6.13.5  PDL 


SUBROUTINE  AI36SR 
IF 

FSUBSR  -*  0 
THEN 

CALL  DAYTIM  <GET  DATE  FOR  TITLE> 
WRITE  THE  TITLE 
WRITE  THE  REPORT 
ENDIF 
RETURN 
END 


6.13.6  Algorithms 


None 


6.13.7  Notes  or  Remarks 


None 
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6.14  AISUMY  - Print  the  Input  Summary 

6.14.1  Identification 
Language:  PARAFOR 

6.14.2  Calling  Sequence 

CALL  AISUMY  (FSUMY,  FSUBSR,  FRATE,  RRATE,  SMFREQ,  SMST,  FLTSLT, 
GWMILE,  PNS,  STATNS,  DMND,  VOPTIM,  SYSTIM,  VINSTA,  VM,  VN,  KNLVL, 
KNREG,  KNDM,  KNSUB,  KNFL,  KNRD,  KMLVL,  KMREG,  KMDM,  KMSUB, 

KMFL,  KMRD) 

6.14.3  Local  Variable  Dictionary 


NAME 

+ + 

1 TYPE  1 DIM 

1 

ARG 

- + - 

1 

FUNCTION 

DAY 

1 

12 

1 

1 

DAY  OF  MONTH  - FOR  THE  TITLE 

DMND 

1 

R4 

IKMDM 

1 

ARG 

1 

SYSTEM  DEMAND  IN  EACH  DEMAND  PERIOD 

FLTSLT 1 

14 

1 

1 

ARG 

1 

ACTIVE  FLEET  SIZE  CO  - AVERAGE,  1 - MAXIMUM) 

FRATE 

1 

R4 

1 KMSUB 

1 

ARG 

| 

FAILURE  RATES  OF  SYSTEMS  PER  UNIT  TIME  AS 

I 

IKMRD 

1 

1 

FUNCTIONS  OF  DIFFERENT  CAUSAL  FACTORS  FOR  EACH 

| 

1 KMLVL 

| 

1 

LEVEL  OF  RELIABILITY  AND  FAILURE  LEVEL 

1 

IKMFL 

1 

1 

FSUBSR 1 

14 

1 

1 

ARG 

1 

I/O  UNIT  FOR  FAILURE  RATES  REPORT 

FSUMY 

1 

14 

| 

1 

ARG 

| 

I/O  UNIT  FOR  INPUT  SUMMARY  FILE 

GWMILE 1 

R4 

1 KMREG 

| 

ARG 

1 

GUIDEWAY  LENGTH  IN  EACH  REGION 

HR 

1 

12 

1 

1 

1 

DUMMY  ARGUMENT 

KMDM 

i 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  DEMAND  PERIODS 

KMFL 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  FAILURE  LEVELS 

KMLVL 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  RELIABLILTY  LEVELS 

KMRD 

1 

14 

1 

1 

ARG 

| 

COMPILED  MAXIMUM  NUMBER  OF  CAUSAL  FACTORS 

KMREG 

1 

14 

1 

1 

ARG 

1 

COMPILED  MAXIMUM  NUMBER  OF  REGIONS 

KMSUB 

1 

14 

1 

I 

ARG 

I 

COMPILED  MAXIMUM  NUMBER  OF  SUBSYSTEMS 

KNDM 

1 

14 

1 

| 

ARG 

1 

NUMBER  OF  DEMAND  PERIODS 

KNFL 

1 

14 

1 

1 

ARG 

1 

NUMBER  OF  FAILURE  LEVELS 

KNLVL 

I 

14 

1 

| 

ARG 

| 

NUMBER  OF  RELIABLITY  LEVELS 

KNRD 

1 

14 

1 

1 

ARG 

1 

NUMBER  OF  CAUSAL  FACTORS  (5) 

KNREG 

1 

14 

| 

| 

ARG 

1 

NUMBER  OF  REGIONS 

KNSUB 

1 

14 

| 

1 

ARG 

1 

NUMBER  OF  SUBSYSTEMS  (4) 

MIN 

1 

12 

1 

1 

1 

DUMMY  ARGUMENT 

MO 

1 

12 

1 

1 

1 

MONTH  OF  YEAR  - FOR  THE  TITLE 

PNS 

1 

R4 

1 KMREG 

1 

ARG 

1 

NUMBER  OF  PASSENGERS  LEAVING  STATIONS  IN  EACH 

1 

IKMDM 

1 

1 

REGION  DURING  EACH  DEMAND  INTERVAL 

RRATE 

1 

R4 

1 

1 

ARG 

1 

VEHICLE  REPAIR  RATE  IN  EACH  BAY 

SMFREQI 

R4 

1 

1 

ARG 

| 

SCHEDULED  MAINTENANCE  FREQUENCY 

SMST 

1 

R4 

| 

| 

ARG 

1 

SCHEDULED  MAINTENANCE  SERVICE  TIME  PER  VEHICLE 

STATNSI 

14 

1 KMREG 

| 

ARG 

1 

NUMBER  OF  STATIONS  IN  EACH  REGION 

SYSTIM 1 

R4 

1 KMDM 

1 

ARG 

1 

SYSTEM  OPERATING  TIME  BY  DEMAND  PERIOD 

TYPE 

1 

R8 

1 2 

1 

1 

CONSTANT  - FLTSLT  CONVERSION  TABLE  (CHARACTER) 

VINSTA 1 

R4 

1 KMREG 1 

ARG 

1 

NUMBER  OF  VEHICLES  THROUGH  STATIONS  IN  EACH 

1 

1 KMDM 

1 

1 

REGION  AND  DEMAND  PERIOD 

vn 

1 

R4 

1 KMREG 1 

ARG 

1 

VEHICLE  DISTANCE  IN  EACH  REGION  DURING 

1 

1 KMDM 

1 

| 

EACH  DEMAND  PERIOD 

VN 

1 

R4 

1 KMREG 1 

ARG 

| 

AVERAGE  NUMBER  OF  VEHICLES  IN  EACH  REGION 

1 

1 KMDM 

1 

1 

DURING  EACH  DEMAND  PERIOD 

VOPTIMI 

14 

1 KMREG 1 

ARG 

1 

TOTAL  VEHICLE  OPERATING  TIME  IN  EACH  REGION 

1 

1 KMDM 

| 

| 

AND  DEMAND  INTERVAL 

YR 

1 

12 

1 

i 

YEAR  OF  CENTURY  - FOR  THE  TITLE 
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6.14.4  Description 


This  routine  formats  and  prints  the  input  summary  report  and  utilizes  AISBSR 
to  produce  the  subsystem  failure  rate  report. 


6.14.5  PDL 


SUBROUTINE  AISUMY 
IF 

FSUMY  = 0 
THEN 

CALL  DAYTIM  <GET  THE  CURRENT  DATE  FOR  THE  TITT  F> 
WRITE  THE  INPUT  SUMMARY  REPORT 
ENDIF 

returnISBSR  <print  the  subsystem  failure  rate  report> 

END 


6.14.6  Algorithms 
None 

6.14.7  Notes  or  Remarks 


None 


6.15  AMOUT  - Output  Values  for  Files 
6.15.1  Identification 


Language:  PARAFOR 


6.15.2  Calling  Sequence 

CALL  AMOUT  (SUBFAL,  DLPDM,  VOP,  VDLTM,  DMND,  DLTIME,  FLTSLT, 
FRATE,  GWMILE,  NUMTRP,  PNS,  STATNS,  STDMND,  SYSTIM,  VINSTA,  VM,  VN, 
VOPTIM,  NOTHRD,  DLPSTD,  VOPD,  PTHRDM,  RRATE,  SMFREQ,  SMST,  THRESH, 
THRIND,  V AVAIL,  TRPS,  TRPDMN,  PAVAIL,  AVSMF , MMBAYS,  VFFREQ,  MNV, 
AVNV,  AFLSZ,  NETRAT,  AVMFLT,  FMF,  PROB,  BAYS,  SF,  INLVL,  KNDM,  KNREG, 
KNSUB,  KNLVL,  KNRD,  KNDL,  KNFL,  KNSFS,  KNSB,  KMDM,  KMREG,  KMSUB, 
KMRD,  KMDL,  KMFL,  KMSFS,  KMSB,  STATS) 
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6.15.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DLTIME 

R4 

KMREG 

KMDM 

Vehicle  delay  time  resulting  from  failures  in  each 

KMSUB 

region  and  demand  period  for  each  subsystem  and 

KMFL 

failure  level 

DMND 

R4 

KMDM 

System  demand  in  each  demand  period 

FLTSLT 

14 

Active  fleet  size  (0  - average,  1 - maximum) 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as  functions 

KMRD 

of  different  causal  factors  for  each  level  of 

KMLVL 

reliability  and  failure  level 

KMFL 

GWMILE 

R4 

KMREG 

ARG 

Guideway  length  in  each  region 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNLVL 

14 

ARG 

Number  of  reliability  levels 

KNRD 

14 

ARG 

Number  of  causal  factors  (5) 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

NOTHRD 

14 

ARG 

Number  of  threshholds 

NUMTRP 

R4 

KMREG 

ARG 

Number  of  trips  delayed  by  each  delay  range 

KMDL 

region  and  demand  period  resulting  in  each 

KMSUB 

failure  level 

KMDM 

PTHRDM 

R4 

ARG 

Minimum  passenger  delay  threshhold 

PNS 

R4 

KMREG 

ARG 

Number  of  passengers  leaving  stations  in  each 

KMDM 

region  during  each  demand  interval 

RRATE 

R4 

ARG 

Vehicle  repair  rate  in  each  bay 

SMFREQ 

R4 

ARG 

Scheduled  maintenance  frequency 

SMST 

R4 

ARG 

Scheduled  maintenance  service  time  per  vehicle 

STATNS 

14 

KMREG 

ARG 

Number  of  stations  in  each  region 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 

THRIND 

R4 

ARG 

Threshhold  increment 

THRESH 

R4 

KMDL 

ARG 

Threshholds 

VINSTA 

R4 

KMREG 

ARG 

Number  of  vehicles  through  stations  in  each 

KMDM 

region  and  demand  period 
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NAME  TYPE  DIM 


ARG  FUNCTION 


VM 

R4 

KMREG 

ARG 

Vehicle  distance  in  each  region  during 

KMDM 

each  demand  period 

VN 

R4 

KMREG 

ARG 

Average  number  of  vehicles  in  each  region 

KMDM 

during  each  demand  period 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region 

KMDM 

and  demand  interval 

STATS 

IR 

ARG 

Data  set  reference  number  to  receive  raw 

statistics  file 

AFLSZ 

R4 

ARG 

Average  fleet  size 

AVNV 

R4 

ARG 

Average  number  of  vehicles 

AVSMF 

R4 

ARG 

Average  scheduled  maintenance  fleet  size 

DLPSTD 

R4 

ARG 

Vehicle  delay  per  day 

INDL 

14 

Index  specifying  delay  threshhold 

IN  DM 

14 

Index  specifying  demand  periods 

INFL 

14 

Index  specifying  failure  level 

INLVL 

14 

ARG 

Index  specifying  level  of  reliability 

INREG 

14 

Index  specifying  region 

INSB 

14 

Index  specifying  number  of  service  bays 

INSFS 

14 

Index  specifying  standby  fleet  size 

KMSB 

14 

ARG 

Maximum  number  of  different  numbers  of  service  bays 

KMSFS 

14 

ARG 

Maximum  number  of  standby  fleet  sizes 

KNSB 

14 

ARG 

Number  of  different  numbers  of  service  bays 

KNSFS 

14 

ARG 

Number  of  standby  fleet  sizes 

MMBAYS 

14 

ARG 

Minimum  maintenance  bays 

STDMND 

R4 

ARG 

Daily  system  demand 

VAVAIL 

R4 

ARG 

Vehicle  availability 

VFFREQ 

R4 

ARG 

Average  vehicle  failure  frequency 

VOPD 

R4 

ARG 

Daily  vehicle  operating  time 

INSUB 

14 

Index  specifying  subsystem 

1 - vehicles 

2 - stations 

3 - gui deways 

4 - central  management 

AVMFLT 

R4 

KMSB 

ARG 

Average  total  maintenance  fleet  sizes  for  ten 

numbers  of  service  bays 

BAYS 

14 

KMSB 

ARG 

Number  of  service  bays  being  considered 

DLPDM 

R4 

KMDM 

ARG 

Vehicle  delay  caused  by  failures  occurring  in 

each  demand  period 

FMF 

R4 

FMSB 

ARG 

Failure  maintenance  fleet  sizes  for  different  numbers 

of  maintenance  bays 

MNV 

R4 

ARG 

Maximum  number  of  vehicles 
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NAME  TYPE  DIM 


ARG  FUNCTION 


NETRAT 

R4 

ARG 

Net  rate  of  vehicle  failures  using  a single  bay 

PAVAIL 

R4 

KMDL 

ARG 

Passenger  availability 

PROB 

R4 

KMSB 

ARG 

The  probabilities  that  ten  different  standby 

KMSFS 

fleet  sizes  are  adequate  given  ten  different  numbers 
of  service  bays 

SF 

14 

KMSFS 

ARG 

Service  fleet  size  being  considered 

SUBFAL 

R4 

KMREG 

ARG 

Subsystem  failures  in  each  region  and  demand  period 

KMDM 

KMSUB 

(Total  - not  single  subsystem  element) 

KMFL 

1 - stoppage  failures,  2 - degradation  failures 

TRPDMN 

R4 

KMDM 

ARG 

Number  of  trips  delayed  by  failures  occurring  in 

KMDL 

each  demand  period 

TRPS 

R4 

KMDL 

ARG 

Number  of  trips  delayed  above  each  threshhold 

VDLTM 

R4 

KMREG 

Total  vehicle  delay  caused  by  failures  occurring  in 

KMDM 

each  region  and  demand  period 

VOP 

R4 

KMDM 

ARG 

Vehicle  operating  time  in  each  demand  period 
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6.15.4  Description 


This  routine  outputs  the  second  section  of  the  raw  statistics  file.  The  first 
section  is  input  variables  only  and  the  second  section  contains  all  computed  results. 

6.15.5  PDL 


PROC:  AtlOUT  <OUTPUT  VALUES  FOR  FILES> 

WRITE  THE  VARIABLE  PART  OF  THE  RAW  STATISTICS  FILE 
EHDPROC 


6.15.6  Algorithms 
None 

6.15.7  Notes  or  Remarks 

The  actual  output  statements  are  in  AFSTAT.  AFSTAT  is  also  used  by  the 
output  processor  to  read  the  raw  statistics  file  which  should  result  in  a consistent 
format.  If  the  file  format  is  changed,  the  version  number  in  AFSTAT  should  be 
incremented. 


6.16  AMSUP  - Supervisory  Portion  of  the  SAM  Model  Processor 

6.16.1  Identification 
Language:  PARAFOR 

6.16.2  Calling  Sequence 
None;  main  program 
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6.16.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DLTIME 

R4 

KMREG 

ARG 

KMDM 

Vehicle  delay  time  resulting  from  failures  in 

KMSUB 

each  region  and  demand  period  for  each  subsystem 

KMFL 

and  failure  level 

DMND 

R4 

KMDM 

ARG 

System  demand  in  each  demand  period 

FLTSLT 

14 

ARG 

Active  fleet  size  (0  - average,  1 - maximum) 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as  functions 

KMRD 

of  different  causal  factors  for  each  level  of 

KMLVL 

reliability  and  failure  level 

KMFL 

GWMILE 

R4 

KMREG 

ARG 

Guideway  length  in  each  region 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KM5UB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNLVL 

14 

ARG 

Number  of  reliability  levels 

KNRD 

14 

ARG 

Number  of  causal  factors  (5) 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

NOTHRD 

14 

ARG 

Number  of  threshholds 

NUMTRP 

R4 

KMREG 

ARG 

Number  of  trips  delayed  by  each  delay  range. 

KMDL 

region,  and  demand  period  resulting  in  each  failure 

KMSUB 

level 

KMDM 

PTHRDM 

R4 

ARG 

Minimum  passenger  delay  threshhold 

PNS 

R4 

KMREG 

ARG 

Number  of  passengers  leaving  stations  in  each 

KMDM 

region  during  each  demand  interval 

RRATE 

R4 

ARG 

Vehicle  repair  rate  in  each  bay 

SMFREQ 

R4 

ARG 

Scheduled  maintenance  frequency 

SMST 

R4 

ARG 

Scheduled  maintenance  service  time  per  vehicle 

STATNS 

14 

KMREG 

ARG 

Number  of  stations  in  each  region 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 

THRIND 

R4 

ARG 

Threshhold  increment 

THRESH 

R4 

KMDL 

ARG 

Threshholds 

VINSTA 

R4 

KMREG 

ARG 

Number  of  vehicles  through  stations  in  each 

KMDM 

region  and  demand  period 
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NAME  TYPE  DIM 


ARG  FUNCTION 


VM 

R4 

KMREG 

ARG 

Vehicle  distance  in  each  region  during  each 

KMDM 

demand  period 

VN 

R4 

KMREG 

ARG 

Average  number  of  vehicles  in  each  region 

KMDM 

during  each  demand  period 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region 

KMDM 

and  demand  interval 

AVMFLT 

R4 

KMSB 

Average  total  maintenance  fleet  sizes  for  ten 

number  of  service  bays 

BAYS 

14 

KMSB 

Number  of  service  bays  being  considered 

DLPDM 

R4 

KMDM 

Vehicle  delay  caused  by  failures  occurring  in 

each  demand  period 

FERATE 

R4 

KMSUB 

Failure  effect  rates  of  subsystems  (failures  of  a 

KMRD 

single  subsystem  element  as  opposed  to  system- 
wide) 

KMLVL 

Per  unit  time  as  functions  of  different  causal 

KMFL 

factors  for  each  level  of  reliability 
1 - stoppage  failures,  2 - degradation  failures 

FMF 

R4 

KMSB 

Failure  maintenance  fleet  sizes  for  different 

numbers  of  maintenance  bays 

FRATET 

R4 

KMSUB 

Failure  rates  of  subsystems  (failures  of  a single 

KMRD 

subsystem  element  as  opposed  to  system-wide) 

KMLVL 

per  unit  time  as  functions  of  different  causal 
factors  for  each  level  of  reliability 

MNV 

R4 

Maximum  number  of  vehicles 

NETRAT 

R4 

Net  rate  of  vehicle  failures  using  a single  bay 

PAVAIL 

R4 

KMDL 

Passenger  availability 

PROB 

R4 

KMSB 

The  probabilities  that  ten  different  standby  fleet 

KMSFS 

sizes  are  adequate  given  ten  different  numbers 
of  service  bays 

SF 

14 

KMSFS 

Service  fleet  size  being  considered 

SUBFAL 

R4 

KMREG 

Subsystem  failures  in  each  region  and  demand  period 

KMDM 

(total  - not  single  subsystem  element) 

KMSUB 

KMFL 

1 - stoppage  failures,  2 - degradation  failures 

TRPDMN 

R4 

KMDM 

Number  of  trips  delayed  by  failures  occurring  in 

KMDL 

each  demand  period 

TRPS 

R4 

KMDL 

Number  of  trips  delayed  above  each  threshhold 

VDLTM 

R4 

KMREG 

Total  vehicle  delay  caused  by  failures  occurring  in 

KMDM 

each  region  and  demand  period 

VOP 

R4 

KMDM 

Vehicle  operating  time  in  each  demand  period 

AFLSZ 

R4 

Active  fleet  size 

AVNV 

R4 

Average  number  of  vehicles 
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NAME  TYPE  DIM 


ARG  FUNCTION 


AVSMF 

R4 

Average  scheduled  maintenance  fleet  size 

DLPSTD 

R4 

Vehicle  delay  per  day 

INDL 

14 

Index  specifying  delay  threshhold 

IN  DM 

14 

Index  specifying  demand  period 

INFL 

14 

Index  specifying  failure  level 

INLVL 

14 

Index  specifying  level  of  reliability 

INREG 

14 

Index  specifying  region 

INSB 

14 

Index  specifying  number  service  bays 

KMSB 

14 

Maximum  number  of  different  numbers  of  service  bay 

KMSFS 

14 

Maximum  number  of  standby  fleet  sizes 

KNSB 

14 

Number  of  different  numbers  of  service  bay 

KNSFS 

14 

Number  of  standby  fleet  sizes 

MMBAYS 

14 

Minimum  maintenance  bays 

STDMND 

R4 

Daily  system  demand 

VAVAIL 

R4 

Vehicle  availability 

VFFREQ 

R4 

Average  vehicle  failure  frequency 

VOPD 

R4 

Daily  vehicle  operating  time 

INSUB 

14 

Index  specifying  subsystem 

1 - vehicles 

2 - stations 

3 - guideways 

4 - central  management 

ON 

14 

Constant  'ON' 

LIB 

R8 

2 

Run  index  entry  library  name  (8  chars) 

INRD 

14 

Index  specifying  causal  factor 

PARM 

14 

Address  of  parameter  list  from  EXEC 

TYPE 

R8 

2 

Run  index  entry  type  name  (8  chars) 

DEBUG 

14 

I/O  unit  to  receive  debug  info  (0  - disable) 

PARAM 

14 

2 

Parameter  from  EXEC  card  (8  chars) 

STATS 

14 

I/O  unit  for  raw  statistics 

STRUC 

14 

I/O  unit  with  structured  data 

ERRFLG 

LI 

Error  flag-set  to  TRUE  by  any  error 

ERRPRT 

14 

I/O  unit  to  receive  error  messages 

FINDEX 

14 

I/O  unit  of  run  index  file 

MEMBER 

14 

2 

Index  to  parameter  list  for  run  index 

MMDDYY  12 

7 

Date  in  character  format 

MODULE 

R8 

Load  module  name 

SYSPRT 

14 

I/O  unit  for  reports 

WRTFLG 

LI 

2 

Flag  to  write  run  index  entry 
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6.16.4  Description 


This  is  the  supervisory  portion  of  the  model  processor.  Section  2.2  describes 
the  model  processor. 

6.16.5  PDL 


PROC:  AMSUP  SUPERVISORY  PORTION  OF  THE  SAM  MODEL  PROCESSOR> 

PRINT  HEADER  FOR  ERROR  MESSAGE  LISTING 
SET  UP  DEBUG  FLAG 

RUN  AREAD  <READ  ALL  REQUIRED  VALUES> 

RUN  ASUBSR  <OUTPUT  SUBSYSTEM  FAILURE  RATES  AND  EFFECT  RATES> 

WRITE  CONSTANT  PART  OF  RAW  STATISTICS  FILE 
FOR 

EACH  SET  OF  FAILURE  RATES  (INLVL) 

DO 

RUN  ARGFAL  CCOMPUTE  FAILURES  FOR  EACH  SUBSYSTEM  IN  EACH  REGION 
AND  DEMAND  PERIOD> 

RUN  AVDEL  <COMPUTE  VEHICLE  DELAY  TIMES  AND  VEHICLE  AVAILABILITY> 
RUN  APHIST  CCOMPUTE  PASSENGER  AVAILABILITY  FOR  DIFFERENT 
THRESHOLDS> 

RUN  AVFLSZ  CCOMPUTE  MAINTENANCE  AND  STANDBY  FLEET  MEASURES> 

RUN  AMOUT  COUTPUT  MISCELANEOUS  VALUES> 

ENDDO 

RUN  AAINDX  CWRITE  RUN  INDEX  ENTRIES> 

ENDPROC 


6.16.6  Algorithms 
None 

6.16.7  Notes  or  Remarks 

The  model  processor  accepts  the  parameter  from  the  PARM  = field  on  the  EXEC 
statement;  the  format  of  the  parameter  is: 

load-module,  run-index,  prog-lib,  prog-proj,  data-proj,  struc,  stats,  debug 

where 


load-module 

run-index 

prog-lib 

prog-proj 

data-proj 

struc 

stats 

debug 


is  the  name  of  the  load  module  used  for  this  execution 
is  the  distinguishing  characters  of  the  run  index  file,  (the 
last  seven  characters  of  the  third  index  level  of  the  file 
name) 

s the  second  level  of  the  STEPLIB  file  name 
s the  first  level  of  the  STEPLIB  film  name 
s the  first  level  of  all  data  files 
s the  structured  data  file  member  name 
s the  raw  statistics  file  member  name 
s used  to  turn  on  debugging  output 
(see  Section  4.0) 


6-33 


6.17  AODLTI  - Print  the  Vehicle  Del  ay  Time  Report 

6.17.1  Identification 
Language:  PARAFOR 

6.17.2  Calling  Sequence 

CALL  AODLTI  (DLTIME,  KNREG,  KN DM,  KNFL,  KNSUB,  KMREG,  KMDM 
KMFL,  KMSUB,  FDLTI) 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DLTIME 

R4 

KMREG 

KMDM 

ARG 

Vehicle  delay  time  resulting  from  failures  in 

KMSUB 

each  region  and  demand  period  for  each 

KMFL 

subsystem  and  failure  level 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

FDLTI 

14 

ARG 

I/O  unit  to  receive  vehicle  delay  time  report 

HR 

12 

Current  time 

MO 

12 

Current  date 

YR 

12 

Current  date 

DAY 

12 

Current  date 

MIN 

12 

Current  time 

INDM 

14 

Index  specifying  demand  period 

INFL 

14 

Index  specifying  failure  level 

INREG 

14 

Index  specifying  reliability  region 

INSUB 

14 

Index  specifying  subsystem 
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6.17.4  Description 


This  routine  produces  the  Vehicle  Delay  Time  report. 

6.17.5  PDL 


<PRINT  THE  VEHICLE  DELAY  TIME  REPORT> 
SUBROUTINE  AODLTI 
IF 

FDLTI  -*  0 
THEN 

CALL  DAYTIM  TO  GET  THE  CURRENT  DATE  FOR  THE  TITLES 
WRITE  THE  REPORT 
ENDIF 
RETURN 
END 


6.17.6  Algorithms 
None 

6.17.7  Notes  or  Remarks 
None 

6.18  AOG DIP  - Lookup  G DIP  Variables 

6.18.1  Identification 
Language:  Assembler 

6.18.2  Calling  Sequence 

CALL  GDIP4  (NAME,  FMT,  IRAL,  IRAH,  IRBL,  IRBH,  IRCL,  IRCH,  IRDL, 
IRDH) 

6.18.3  Local  Variable  Dictionary 
None 

6.18.4  Description 

All  GDIP  variables  acceptable  to  the  output  processor  are  defined  here 
utilizing  the  GDIP  macros. 
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PDL 


6.18.5 

None 

6.18.6  Algorithms 
None 

6.18.7  Notes  or  Remarks 
None 


6.19  AOMAIN  - Print  the  Maintenance  Report 

6.19.1  Identification 
Language:  PARAFOR 

6.19.2  Calling  Sequence 

CALL  AOMAIN  (AFLSZ,  AVMFLT,  AVSMF,  FMF,  PROB,  FLTSLT,  MMBAYS, 
RRATE,  SMFREQ,  SMST,  SYSTIM,  VFFREQ,  VN,  VOPD,  SF,  BAYS,  INLVL,  KNSFS, 
KNSB,  KNREG,  KNDM,  KMSFS,  KMSB,  KMREG,  KMDM,  FMAIN) 


6-36 


6,19.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

FLTSLT 

14 

ARG 

Active  fleet  size  (0  - average,  1 - maximum) 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNREG 

14 

ARG 

Number  of  regions 

RRATE 

R4 

ARG 

Vehicle  repair  rate  in  each  bay 

SMFREQ 

R4 

ARG 

Scheduled  maintenance  frequency 

SMST 

R4 

ARG 

Scheduled  maintenance  service  time  per  vehicle 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 

VN 

R4 

KMREG 

ARG 

Average  number  of  vehicles  in  each  region 

FMAIN 

14 

ARG 

Data  set  reference  number  to  receive  Maintenance 

Measures  report 

HR 

12 

Current  date  and  time 

MO 

12 

Current  date  and  time 

YR 

12 

Current  date  and  time 

DAY 

12 

Current  date  and  time 

MIN 

12 

Current  date  and  time 

TYPE 

R8 

2 

Character  constant:  active  fleet  size  types 

AVMFLT 

R4 

KMSB 

ARG 

Average  total  maintenance  fleet  sizes  for  ten  numbers 

of  service  bays 

BAYS 

14 

KMSB 

ARG 

Number  of  service  bays  being  considered 

FMF 

R4 

FMSB 

ARG 

Failure  maintenance  fleet  sizes  for  different  numbers 

of  maintenance  bays 

PROB 

R4 

KMSB 

ARG 

The  probabilities  that  ten  different  standby 

KMSFS 

fleet  sizes  are  adequate  given  ten  different  numbers 

of  service  bays 

SF 

14 

KMSFS 

ARG 

Service  fleet  size  being  considered 

AFLSZ 

R4 

ARG 

Active  fleet  size 

AVSMF 

R4 

ARG 

Average  scheduled  maintenance  fleet  size 

IN  DM 

14 

Index  specifying  demand  period 

INLVL 

14 

ARG 

Index  specifying  level  of  reliability 

INREG 

14 

ARG 

Index  specifying  region 

INSB 

14 

Index  specifying  number  of  service  bays 

KMSB 

14 

ARG 

Maximum  number  of  different  numbers  of  service  bays 

KMSFS 

14 

ARG 

Maximum  number  of  standby  fleet  sizes 

KNSB 

14 

ARG 

Number  of  different  numbers  of  service  bays 

KNSFS 

14 

ARG 

Number  of  standby  fleet  sizes 

MMBAYS 

14 

ARG 

Minimum  maintenance  bays 

VFFREQ 

R4 

ARG 

Average  vehicle  failure  frequency 

VOPD 

R4 

ARG 

Daily  vehicle  operating  time 

INSUB 

14 

Index  specifying  subsystem 

1 - vehicles 

2 - stations 

3 - gui deways 

4 - central  management 
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6.19.4 


Description 


This  routine  produces  the  Maintenance  Fleet  Measures  report. 

6.19.5  PDL 


SUBROUTINE  AOMAIN 
IF 

FMAIN  -=  0 
THEN 

CALL  DAYTIM  TO  GET  THE  CURRENT  DATE  FOR  THE  TITLES 
WRITE  THE  TITLES  AND  THE  SUMMARY 

WRITE  THE  PROBABILITY  OF  FLEET  SIZE  BEING  ADEQUATE  TABLE 
PRINT  THE  NUMBER  OF  VEHICLES  BY  REGION 
ENDIF 
RETURN 
END 


6.19.6  Algorithms 


None 


6.19.7  Notes  or  Remarks 


None 
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6.20  AONUMT  - Print  the  Number  of  Trips  Delayed  Report 


6.20.1  Identification 
Language:  PARAFOR 

6.20.2  Calling  Sequence 

CALL  AONUMT  (NUMTRP,  THRESH,  KNREG,  KNDM,  KNFL,  KNSUB, 
KNDL,  KMREG,  KMDM,  KMFL,  KMSUB,  KMDL,  FNTRP) 

6.20.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

NUMTRP 

R4 

KMREG 

ARG 

Number  of  trips  delayed  by  each  delay  range 

KMDL 

region  and  demand  period  resulting  in  each 

KMSUB 

fai  lure  level . 

THRESH 

R4 

KMDL 

ARG 

Threshholds 

FNTRP 

14 

ARG 

Data  set  reference  number  to  receive  the  passengers 
delayed  report  (0  to  omit  report) 

HR 

12 

Current  date  and  time 

MO 

12 

Current  date  and  time 

YR 

12 

Current  date  and  time 

DAY 

12 

Current  date  and  time 

MIN 

12 

Current  date  and  time 

SUBNAM 

R8 

4 

Subsystem  names  (character  constants) 

6.20.4  Description 


This  routine  produces  the  Passengers  Debyed  report. 
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6.20.5 


6.20.6 


6.20.7 


PDL 


SUBROUTINE  AONUMT 
IF 

FNTRP  - = 0 
THEN 

CALL  DAYTIM  TO  GET  THE  CURRENT  DATE  FOR  THE  TITLES 
WRITE  THE  REPORT 
ENDIF 
RETURN 
END 


Algorithms 


None 

Notes  or  Remarks 


None 
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6.21  AO  PASS  - Print  the  Passenger  Availability  Report 


6.21.1  Identification 
Language:  PARAFOR 

6.21.2  Calling  Sequence 

CALLAOPASS  (FPASS,  DMND,  PA  VAIL,  TRPS,  TRPDMN,  THRESH, 
STDMND,  INLVL,  KNDL,  KNDM,  KNFL,  KNREG,  KNSUB,  KMDL,  KMDM, 
KMFL,  KMREG,  KMSUB) 

6.21.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DMND 

R4 

KMDM 

ARG 

System  demand  in  each  demand  period 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

THRESH 

R4 

KMDL 

ARG 

Threshholds 

FPASS 

14 

ARG 

Data  set  reference  number  to  receive  the  passenger 

availability  report 

HR 

12 

MO 

12 

YR 

12 

1 Current  date  and  time 

DAY 

12 

MIN 

12 

PAVAIL 

R4 

KMDL 

ARG 

Passenger  availability 

TRPDMN 

R4 

KMDM 

ARG 

Number  of  trips  delayed  by  failures  occurring  in 

KMDL 

each  demand  period 

TRPS 

R4 

KMDL 

ARG 

Number  of  trips  delayed  above  each  threshhold 

INDL 

14 

Index  specifying  delay  threshhold 

INDM 

14 

Index  specifying  demand  period 

INLVL 

14 

ARG 

Index  specifying  level  of  reliability 

STDMND 

R4 

ARG 

Daily  system  demand 
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6.21 .4  Description 


This  routine  produces  the  Passenger  Availability  report. 


6.21.5  PDL 


SUBROUTINE  AOPASS 
IF 

FPASS  -a  0 
THEN 

CALL  DAYTIM  TO  GET  THE  CURRENT  DATE  FOR  THE  TITLES 
WRITE  THE  REPORT  TITLE 
WRITE  THE  BODY  OF  THE  REPORT 
WRITE  THE  TOTALS 

WRITE  THE  PASSENGER  AVAILABILITY  NUMBERS 
ENDIF 
RETURN 
END 


6.21 .6  Algorithms 


None 


6.21 .7  Notes  or  Remarks 


None 


6.22  AOPSUM  - Write  the  Performance  Summary  File 


6.22.1  Identification 


Language:  PARAFOR 


6.22.2  Calling  Sequence 

CALL  AOPSUM  (FPSUM,  AFLSZ,  AVMFLT,  AVSMF,  BAYS,  DLPSTD, 
FLTSLT,  FMF,  FRATET,  PAVAIL,  PROB,  SF,  STDMND,  SYSTIM,  THRESH,  TRPS, 
VAVAIL,  VO  PD,  INLVL,  KNDL,  KNSFS,  KNSB,  KNDM,  KMDL,  KMSFS,  KMSB, 
KMDM,  KMRD,  KMLVL,  KMSUB) 
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6.22.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

FLT5LT 

14 

ARG 

Active  fleet  size  (0  - average,  1 - maximum) 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 

THRESH 

R4 

KMDL 

ARG 

Threshholds 

FPSUM 

14 

ARG 

Data  set  reference  number  to  which  the  performance 

summary  is  written 

SOPTIM 

R4 

Total  system  operation  time  (per  day) 

AVMFLT 

R4 

KMSB 

ARG 

Average  total  maintenance  fleet  sizes  for  ten 
numbers  of  service  bays 

BAYS 

14 

KMSB 

ARG 

Number  of  service  bays  being  considered 

FMF 

R4 

FMSB 

ARG 

Failure  maintenance  fleet  sizes  for  different 

numbers  of  maintenance  bays 

FRATET 

R4 

KMSUB 

ARG 

Failure  rates  of  subsystems  (failures  of  a single 

KMRD 

subsystem  element  as  opposed  to  system-wide) 

KMLVL 

per  unit  time  as  functions  of  different  causal 
factors  for  each  level  of  reliability 

PAVAIL 

R4 

KMDL 

ARG 

Passenger  availability 

PROB 

R4 

KMSB 

ARG 

The  probabilities  that  ten  different  standby 

KMSFS 

fleet  sizes  are  adequate  given  ten  different 
numbers  of  service  bays 

SF 

14 

KMSFS 

ARG 

Service  fleet  size  being  considered 

TRPS 

R4 

KMDL 

ARG 

Number  of  trips  delayed  above  each  threshhold 

AFLSZ 

R4 

ARG 

Active  fleet  size 

AVSMF 

R4 

ARG 

Average  scheduled  maintenance  fleet  size 

DLPSTD 

R4 

ARG 

Vehicle  delay  per  day 

INSB 

14 

Index  specifying  number  of  service  bays 

INSFS 

14 

Index  specifying  standby  fleet  size 

KMSFS 

14 

ARG 

Maximum  number  of  standby  fleet  sizes 

KNSB 

14 

ARG 

Number  of  different  numbers  of  service  bay 

KNSFS 

14 

ARG 

Number  of  standby  fleet  sizes 

STDMND 

R4 

ARG 

Daily  system  demand 

VAVAIL 

R4 

ARG 

Vehicle  availability 

VO  P D 

R4 

ARG 

Daily  vehicle  operating  time 
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6.22.4  Description 


This  routine  writes  the  performance  summary  file. 

6.22.5  PDL 


SUBROUTINE  AOPSUM 

<COMPUTE  THE  TOTAL  SYSTEM  OPERATION  TIME> 

SOPTIM  = 0 
FOR 

EACH  DEMAND  INTERVAL (INDM) 

DO 

SOPTIM  = SOPTIM  ♦ SYSTIM(INDM) 

ENDDO 

<FIND  THE  STANDBY  FLEET  REQUIRED  FOR  955?  AVAILABILITY> 

INSFS  = 1 
WHILE 

INSFS  < KNSFS  £ 

PROBC 1 , INSFS)  < 95 5? 

DO 

INSFS  = INSFS  + 1 
ENDDO 

<COMPUTE  THE  NUMBER  OF  SERVICE  BAYS  REQUIRED  FOR  955?  AVAILABILITY> 

INSB  = 1 

WHILE 

INSB  < KNSB  £ 

PROBC  INSB,  1)  < 955? 

DO 

INSB  = INSB  + 1 
ENDDO 

WRITE  THE  PERFORMANCE  SUMMARY  FILE 
RETURN 
END 


6.22.6  Algorithms 
None 

6.22.7  Notes  or  Remarks 

The  sequence  of  variables  output  into  the  performance  summary  file  must  correspond 
to  the  name  in  AGT.  IANDD.  FORMS  (SAM). 
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6.23  AOREAD  - Read  the  Values  of  the  Statistics  for  a Reliability  Level 

6.23.1  Identification 
Language:  PARAFOR 

6.23.2  Cal  ling  Sequence 

CALL  AOREAD  (SUBFAL,  DLPDM,  VOP,  VDLTM,  DMN D,  DLTIME,  FLTSLT, 
FRATE,  GWMILE,  NUMTRP,  PNS,  STATNS,  STDMND,  SYSTIM,  VINSTA,  VM,  VN, 
VOPTIM,  NOTHRD,  DLPSTD,  VOPD,  PTHRDM,  RRATE,  SMFREQ,  SMST,  THRESH, 
THRIND,  V AVAIL,  TRPS,  TRPDMN,  PAVAIL,  AVSMF , MMBAYS,  VFFREQ,  MNV, 


AVNV,  AFLSZ, 

NET  RAT 

AVMFLT,  FMF,  PROB,  BAYS,  SF,  INLVL,  KNDM,  KNREG 

KNSUB, 

KNLVL 

, KNRD, 

KNDL 

, KNFL,  KNSFS,  KNSB,  KMDM,  KMREG,  KMSUB, 

KMLVL, 

KMRD, 

KMDL, 

KMFL, 

KMSFS,  KMSB,  STATS,  SYSPRT) 

6.23.3 

Local 

Variable 

Dictionary 

NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DLTIME 

R4 

KMREG 

ARG 

KMDM 

Vehicle  delay  time  resulting  from  failures  in 

KMSUB 

each  region  and  demand  period  for  each 

KMFL 

subsystem  and  failure  level 

DMND 

R4 

KMDM 

ARG 

System  demand  in  each  demand  period 

FLTSLT 

14 

ARG 

Active  fleet  size  (0  - average,  1 - maximum) 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as 

KMRD 

functions  of  different  causal  factors  for  each 

KMLVL 

level  of  reliability  and  failure  level 

KMFL 

GWMILE 

R4 

KMREG 

ARG 

Guideway  length  in  each  region 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNLVL 

14 

ARG 

Number  of  reliability  levels 

KNRD 

14 

ARG 

Number  of  causal  factors  (5) 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 
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NAME 


TYPE  DIM 


ARG  FUNCTION 


NOTHRD 

14 

ARG 

Number  of  fhreshholds 

NUMTRP 

R4 

KMREG 

ARG 

Number  of  frips  delayed  by  each  delay  range 

KMDL 

region  and  demand  period  resulting  in  each 

KMSUB 

KMDM 

failure  level 

PTHRDM 

R4 

ARG 

Minimum  passenger  delay  threshhold 

PNS 

R4 

KMREG 

ARG 

Number  of  passengers  leaving  stations  in  each 

KMDM 

region  during  each  demand  interval 

RRATE 

R4 

ARG 

Vehicle  repair  rate  in  each  bay 

SMFREQ 

R4 

ARG 

Scheduled  maintenance  frequency 

SMST 

R4 

ARG 

Scheduled  maintenance  service  time  per  vehicle 

STATNS 

14 

KMREG 

ARG 

Number  of  stations  in  each  region 

SYSPRT 

14 

ARG 

Unit  for  printing  error  messages 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 

THRIND 

R4 

ARG 

Threshhold  increment 

THRESH 

R4 

KMDL 

ARG 

Threshhold 

VINSTA 

R4 

KMREG 

ARG 

Number  of  vehicles  through  stations  in  each 

KMDM 

region  and  demand  period 

VM 

R4 

KMREG 

ARG 

Vehicle  distance  in  each  region  during 

KMDM 

each  demand  period 

VN 

R4 

KMREG 

ARG 

Average  number  of  vehicles  in  each  region 

KMDM 

during  each  demand  period 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region 

KMDM 

and  demand  interval 

STATS 

14 

ARG 

Data  set  reference  number  of  raw  statistics  file 

AVMFLT 

R4 

KMSB 

ARG 

Average  total  maintenance  fleet  sizes  for  ten 

numbers  of  service  bays 

BAY 

14 

KMSB 

ARG 

Number  of  service  bays  being  considered 

DLPDM 

R4 

KMDM 

ARG 

Vehicle  delay  caused  by  failures  occurring  in 

each  demand  period 

FMF 

R4 

FMSB 

ARG 

Failure  maintenance  fleet  sizes  for  different  numbers 

of  maintenance  bays 

MNV 

R4 

ARG 

Maximum  number  of  vehicles 

NETRAT 

R4 

ARG 

Net  rate  of  vehicle  failures  using  a single  bay 

PAVAIL 

R4 

KMDL 

ARG 

Passenger  availability 

PROB 

R4 

KMSB 

ARG 

The  probabilities  that  ten  different  standby 

KMSFS 

fleet  sizes  are  adequate  given  ten  different 
number  of  service  bays 

SF 

14 

KMSFS 

ARG 

Service  fleet  size  being  considered 

SUBFAL 

R4 

KMREG 

ARG 

Subsystem  failures  in  each  region  and  demand  period 

KMDM 

(Total  - not  single  subsystem  element) 

KMSUB 

KMFL 

1 - stoppage  failures,  2 - degradation  failures 

TRPDMN 

R4 

KMDM 

ARG 

Number  of  trips  delayed  by  failures  occurring  in 

KMDL 

each  demand  period 
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NAME  TYPE*  DIM  ARG  FUNCTION 


TRPS 

R4 

KMDL 

ARG 

Number  of  trips  delayed  above  each  threshhold 

VDLTM 

R4 

KMREG 

ARG 

Total  vehicle  delay  caused  by  failures  occurring  in 

KM  DM 

each  region  and  demand  period 

VOP 

R4 

KMDM 

ARG 

Vehicle  operating  time  in  each  demand  period 

AFLSZ 

R4 

ARG 

Active  fleet  size 

AVNV 

R4 

ARG 

Average  number  of  vehicles 

AVSMF 

R4 

ARG 

Average  scheduled  maintenance  fleet  size 

DLPSTD 

R4 

ARG 

Vehicle  delay  per  day 

INDL 

14 

Index  specifying  delay  threshhold 

IN  DM 

14 

Index  specifying  demand  period 

INFL 

14 

Index  specifying  failure  level 

INLVL 

14 

ARG 

Index  specifying  level  of  reliability 

INREG 

14 

ARG 

Index  specifying  region 

INSB 

14 

Index  specifying  number  of  service  bays 

INSFS 

14 

Index  specifying  standby  fleet  size 

KMSB 

14 

ARG 

Maximum  number  of  different  numbers  of  service  bays 

KMSFS 

14 

ARG 

Maximum  number  of  standby  fleet  sizes 

KNSB 

14 

ARG 

Number  of  different  numbers  of  service  bays 

KNSFS 

14 

ARG 

Number  of  standby  fleet  sizes 

MMBAYS 

14 

ARG 

Minimum  maintenance  bays 

STDMND 

R4 

ARG 

Daily  system  demand 

V AVAIL 

R4 

ARG 

Vehicle  availability 

VFFREQ 

R4 

ARG 

Average  vehicle  failure  frequency 

VOPD 

R4 

ARG 

Daily  vehicle  operating  time 

INSUB 

14 

Index  specifying  subsystems 

1 - vehicles 

2 - stations 

3 - guideways 

4 - central  management 

6.23.4  Description 

This  routine  inputs  the  second  section  of  the  raw  statistics  file.  The  first 
section  is  input  variables  only  and  the  second  section  contains  all  computed  results. 

6.23.5  PDL 


SUBROUTINE  AOREAD 

READ  THE  RAM  STATISTICS  FILE 
RETURN 
END 
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6.23.6 


Algorithms 


None 

6.23.7  Notes  or  Remarks 


The  actual  input  statements  are  in  AFSTAT.  AFSTAT  is  also  used  by  the  model 
processor  to  write  the  raw  statist'cs  file  which  should  result  in  a consistent  format.  If  the 
file  format  is  changed,  the  version  number  in  AFSTAT  should  be  incremented. 


6.24  AORELY  - Print  the  Reliability  Parameters  Report 

6.24.1  Identification 
Language:  PARAFOR 

6.24.2  Calling  Sequence 

CALL  AORELY  (FRELY,  FSUBSR,  FERATE,  FRATE,  FRATET,  GWMILE,  PNS, 
STATNS,  SUBFAL,  SYSTIM,  VINSTA,  VM,  VOPTIM,  INLVL,  KNREG,  KN DM,  KNSUB, 
KNFL,  KNRD,  KMLVL,  KMREG,  KMDM,  KMSUB,  KMFL,  KMRD) 


6.24.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as 

KMRD 

functions  of  different  causal  factors  for  each 

KMLVL 

level  of  reliability  and  failure  level 

KMFL 

GWMILE 

R4 

KMREG 

ARG 

Guideway  length  in  each  region 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNRD 

14 

ARG 

Number  of  causal  factors  (5) 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

PNS 

R4 

KMREG 

ARG 

Number  of  passengers  leaving  stations  in  each 

KMDM 

region  during  each  demand  interval 

STATNS 

14 

KMREG 

ARG 

Number  of  stations  in  each  region 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 
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NAME  TYPE  DIM  ARG  FUNCTION 


VINSTA 

R4 

KMREG 

ARG 

Number  of  vehicles  through  stations  in  each 

KMDM 

region  and  demand  period 

VM 

R4 

KMREG 

ARG 

Vehicle  distance  in  each  region  during  each 

KMDM 

demand  period 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region  and 

demand  interval 

FRELY 

14 

ARG 

Data  set  reference  number  for  Reliability  Parameters 

report 

FSUBSR 

14 

ARG 

Data  set  reference  number  for  Subsystem  Failure 

Rate  report 

HR 

12 

Current  date  and  time 

MO 

12 

Current  date  and  time 

YR 

12 

Current  date  and  time 

DAY 

12 

Current  date  and  time 

MIN 

12 

Current  date  and  time 

FERATE 

R4 

KMSUB 

ARG 

Failure  effect  rates  of  subsystems  (failures  of  a 

KMRD 

single  subsystem  element  as  opposed  to  system-wide) 

KMLVL 

per  unit  time  as  functions  of  causal  factors  for  each 

KMFL 

level  of  reliability 

1 - stoppage  failures,  2 - degradation  failures 

FRATET 

R4 

KMSUB 

ARG 

Failure  rates  of  subsystems  (failures  of  a single 

KMRD 

subsystem  element  as  opposed  to  system- wide) 

KMLVL 

per  unit  time  as  functions  of  different  causal 
factors  for  each  level  of  reliability 

SUBFAL 

R4 

KMREG 

ARG 

Subsystem  failures  in  each  region  and  demand  period 

KMDM 

(total  - not  single  subsystem  element) 

KMSUB 

KMFL 

1 - stoppage  failures,  2 - degradation  failures 

IN  DM 

14 

Index  specifying  demand  period 

INFL 

14 

Index  specifying  failure  level 

INLVL 

14 

ARG 

Index  specifying  level  of  reliability 

INREG 

14 

Index  specifying  region 

INSUB 

14 

Index  specifying  subsystem 

1 - vehicles 

2 - stations 

3 - guideways 

4 - central  management 

6.24.4  Description 


This  routine  prints  Reliability  Parameters  report,  i.e.,  the  expected  number 
of  failures  for  each  subsystem  and  the  parameters  used  to  derive  them.  Then  it  calls 
AOSBSR  to  print  the  subsystem  failure  rates. 
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6.24.5 


PDL 


SUBROUTINE  AORELY 
IF 

FRELY  -=  0 
THEN 

CALL  DAYTIM  TO  GET  THE  CURRENT  DATE  FOR  THE  TITLES 
WRITE  THE  REPORT  TITLE 
WRITE  THE  BODY  OF  THE  REPORT 
ENDIF 

CALL  AOSBSR  TO  PRINT  THE  SUBSYSTEM  FAILURE  RATES 
RETURN 
END 


6.24.0  Algorithms 
None 

6.24.7  Notes  or  Remarks 


N one 


6.25  AOSBSR  - Print  the  Failure  Rates  Report 

6.25.1  Identification 
Language:  PARAFOR 

6.25.2  Cal  ling  Sequence 


CALL  AOSBSR  (FSUBSR,  FERATE,  FRATE,  FRATET,  INLVL,  KNSUB,  KNFL, 
KNRD,  KMLVL,  KMSUB,  KMFL,  KMRD) 


6.25.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as 

KMRD 

functions  of  different  causal  factors  for  each 

KMLVL 

KMFL 

level  of  reliability  and  failure  level 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNFL 

14 

ARG 

Number  of  failure  levels 
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NAME  TYPE  DIM  ARG  FUNCTION 


KNRD 

14 

ARG 

Number  of  causal  factors  (5) 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

FSUBSR 

14 

ARG 

Data  set  reference  number  for  subsystem  failure  rates 

HR 

12 

Current  date  and  time 

MO 

12 

Current  date  and  time 

YR 

12 

Current  date  and  time 

DAY 

12 

Current  date  and  time 

MIN 

12 

Current  date  and  time 

SUBSYS 

R8 

4 

Character  constants:  subsystem  names 

FERATE 

R4 

KMSUB 

ARG 

Failure  effect  rates  of  subsystems  (failures  of  a 

KMRD 

single  subsystem  element  as  opposed  to  system-wide) 

KMLVL 

per  unit  time  as  functions  of  different  causal 

KMFL 

factors  for  each  level  of  reliability 
1 - stoppage  failures,  2 - degradation  failures 

FRATET 

R4 

KMSUB 

ARG 

Failure  rates  of  subsystems  (failures  of  a single 

KMRD 

subsystem  element  as  opposed  to  system-wide) 

KMLVL 

per  unit  time  as  functions  of  different  causal 
factors  for  each  level  of  reliability 

INLVL 

14 

ARG 

Index  specifying  level  of  reliability 

6.25.4 

Description 

This  routine  prints  the  subsystem  failure  rates  report. 


6.25.5  PDL 


SUBROUTINE  AOSBSR 
IF 

FSUBSR  •'=  0 

THCALL  DAYTIH  TO  GET  THE  CURRENT  DATE  FOR  THE  TITLES 
WRITE  THE  TITLES 
WRITE  THE  BODY  OF  THE  REPORT 
ENDIF 
RETURN 
END 

6.25.6  Algorithms 


None 


6.25.7  Notes  or  Remarks 


None 


6.26  OUTPT  - Output  Processor  Main  Program 


6.26.1  Identification 
Language:  PARAFOR 

6.26.2  Calling  Sequence 
None;  main  program 

6.26.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DLTIME 

R4 

KMREG 

ARG 

KMDM 

Vehicle  delay  time  resulting  from  failures  in 

KMSUB 

each  region  and  demand  period  for  each 

KMFL 

subsystem  and  failure  level 

DMND 

R4 

KMDM 

ARG 

System  demand  in  each  demand  period 

FLTSLT 

14 

ARG 

Active  fleet  size  (0  - average,  1 - maximum) 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as 

KMRD 

functions  of  different  causal  factors  for  each 

KMLVL 

level  of  reliability  and  failure  level 

KMFL 

GWMILE 

R4 

KMREG 

ARG 

Guideway  length  in  each  region 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNLVL 

14 

ARG 

Number  of  reliability  levels 

KNRD 

14 

ARG 

Number  of  causal  factors  (5) 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

NOTHRD 

14 

ARG 

Number  of  threshholds 

NUMTRP 

R4 

KMREG 

ARG 

Number  of  trips  delayed  by  each  delay  range 

KMDL 

region  and  demand  period  resulting  in  each 

KMSUB 

fai  lure  level . 

KMDM 

PTHRDM 

R4 

ARG 

Minimum  passenger  delay  threshhold 

PNS 

R4 

KMREG 

ARG 

Number  of  passengers  leaving  stations  in  each 

KMDM 

region  during  each  demand  interval 

RRATE 

R4 

ARG 

Vehicle  repair  rate  in  each  bay 
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NAME  TYPE  DIM 


ARG  FUNCTION 


SMFREQ 

R4 

ARG 

Scheduled  maintenance  frequency 

SMST 

R4 

ARG 

Scheduled  maintenance  service  time  per  vehicle 

STATNS 

14 

KMREG 

ARG 

Number  of  stations  in  each  region 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 

THRIND 

R4 

ARG 

Threshhold  increment 

THRESH 

R4 

KMDL 

ARG 

Threshholds 

VINSTA 

R4 

KMREG 

ARG 

Number  of  vehicles  through  stations  in  each 

KMDM 

region  and  demand  period 

VM 

R4 

KMREG 

ARG 

Vehicle  distance  in  each  region  during 

KMDM 

each  demand  period 

VN 

R4 

KMREG 

ARG 

Average  number  of  vehicles  in  each  region 

KMDM 

during  each  demand  period 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region 

KMDM 

and  demand  interval 

AVMFLT 

R4 

KMSB 

Average  total  maintenance  fleet  sizes  for  ten 

numbers  of  service  bays 

BAYS 

14 

KMSB 

Number  of  service  bays  being  considered 

DLPDM 

R4 

KMDM 

Vehicle  delay  caused  by  failures  occurring  in 

each  demand  period 

FERATE 

R4 

KMSUB 

Failure  effect  rates  of  subsystems  (failures  of  a 

KMRD 

single  subsystem  element  as  opposed  to  system-wide) 

KMLVL 

per  unit  time  as  functions  of  different  causal 

KMFL 

factors  for  each  level  of  reliability 
1 - stoppage  failures,  2 - degradation  failures 

FMF 

R4 

FMSB 

Failure  maintenance  fleet  sizes  for  different 
numbers  of  maintenance  bays 

FRATET 

R4 

KMSUB 

Failure  rates  of  subsystems  (failures  of  a single 

KMRD 

subsystem  element  as  opposed  to  system-wide) 

KMLVL 

per  unit  time  as  functions  of  different  causal 
factors  for  each  level  of  reliability 

MNV 

R4 

Maximum  number  of  vehicles 

NETRAT 

R4 

Net  rate  of  vehicle  failures  using  a single  bay 

PA  VAIL 

R4 

KMDL 

Passenger  availability 

PROB 

R4 

KMSB 

The  probabilities  that  ten  different  standby 

KMSFS 

fleet  sizes  are  adequate  given  ten  different 
numbers  of  service  bays 

SF 

14 

KMSFS 

Service  fleet  size  being  considered 

SUBFAL 

R4 

KMREG 

Subsystem  failures  in  each  region  and  demand  period 

KMDM 

(total  - not  single  subsystem  element) 

KMSUB 

KMFL 

1 - stoppage  failures,  2 - degradation  failures 

TRPDMN 

R4 

KMDM 

Number  of  trips  delayed  by  failures  occurring  in 

KMDL 

each  demand  period 

TRPS 

R4 

KMDL 

Number  of  trips  delayed  above  each  threshhold 

VDLTM 

R4 

KMREG 

Total  vehicle  delay  caused  by  failures  occurring  in 

KMDM 

each  region  and  demand  period 

VOP 

R4 

KMDM 

Vehicle  operating  time  in  each  demand  period 
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14 

14 

14 

14 

14 

14 

14 

14 

R4 

R4 

R4 

R4 

14 

R8 

14 

14 

R8 

14 

LI 

14 

14 

14 

12 

R8 

14 

LI 

14 

14 

14 

14 

14 

14 

14 

14 

14 


DIM  ARG  FUNCTION 

Active  fleet  size 

Average  number  of  vehicles 

Average  scheduled  maintenance  fleet  size 

Vehicle  delay  per  day 

Index  specifying  delay  threshhold 

Index  specifying  demand  period 

Index  specifying  failure  level 

Index  specifying  level  of  reliability 

Index  specifying  region 

Number  of  different  numbers  of  service  bay 

Number  of  standby  fleet  sizes 

Minimum  maintenance  bays 

Daily  system  demand 

Vehicle  availability 

Average  vehicle  failure  frequency 

Daily  vehicle  operating  time 

Index  specifying  subsystems 

1 - vehicles 

2 - stations 

3 - guideways 

4 - central  management 

2 Run  index  entry  library  name  (8  characters) 

Index  specifying  causal  factor 
Address  of  parameter  list  from  EXEC 
2 Run  index  entry  tape  name  (8  characters) 

I/O  unit  for  raw  statistics 
Error  flag  - set  to  TRUE  by  any  error 
I/O  unit  to  receive  error  messages 
I/O  unit  of  run  index  file 

2 Index  to  parameter  list  for  run  index 

7 Date  in  character  format 

Load  module  name 
I/O  unit  for  reports 

2 Flag  to  write  run  index  entry 

Unit  for  vehicle  availability  report  (0  - omit  report) 

6 Control  card  names  (4  characters) 

Unit  for  vehicle  delay  time  report  (0  - omit  report) 

Unit  for  maintenance  report  (0  - omit  report) 

Unit  for  Number  of  Trips  Delayed  report  (0  - omit  report) 
Unit  for  Passenger  Availability  report  (0  - omit  report) 
Unit  for  Performance  Summary  file 
Unit  for  Reliability  report  (0  - omit) 

2 Name  of  run  index  file 
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NAME  TYPE  DIM 


ARG  FUNCTION 


MODEL  12 

SYSIN  14 

ACTION  14  6 

F5UBSR  14 

NDXFLG  LI 

TMPFIL  14 

6.26.4  Description 


Model  id:  constant  'AO' 

Unit  for  run  time  inputs 

Type  of  processing  for  the  control  cards  described 
in  CCRDS 

Unit  for  Subsystem  Reliability  report  (0  - omit  report) 
Not  used  (parameter) 

Unit  with  scratch  file 


This  is  the  supervisory  portion  of  the  output  processor.  Section  2.3  describes 
the  output  processor. 

6.26.5  PDL 


CALL  AADATE  TO  GET  THE  TITLE  IN  CHARACTER  FORMAT 

PRINT  THE  CONTROL  CARD  LOG  TITLE 

CALL  AACCRD  TO  READ  AND  PROCESS  CONTROL  CARDS 

READ  THE  COMMON  PART  OF  THE  RAW  STATISTICS  FILE 

CALL  FAGETP  TO  GET  THE  RUN  INDEX  FILE  NAME 

WRITE  THE  HEADER  LINE  OF  THE  RUN  INDEX  FILE 

FOR 

EACH  RELIABILITY  LEVEL(INLVL) 

DO 

CALL  AOREAD  TO  READ  THE  FIRST  DATA  GROUP  FROM  THE  RAW  STATISTIC  FILE 

CALL  AORELY  TO  PRINT  THE  RELIABILITY  REPORT 

CALL  AOPASS  TO  PRINT  THE  PASSENGER  AVAILABILITY  REPORT 

CALL  AOMAIN  TO  PRINT  THE  MAINTAINENCE  REPORT 

CALL  AOVEH  TO  PRINT  THE  VEHICLE  AVAILABILITY  REPORT 

IF 

- ERRFLG 
THEN 

CALL  AOPSUM  TO  WRITE  THE  PERFORMANCE  SUMMARY  FILE 
ENDIF 
ENDDO 

CALL  AODLTI  TO  PRINT  THE  VEHICLE  DELAY  TIMES 
CALL  AONUMT  TO  PRINT  THE  NUMBER  OF  PASSENGERS  DELAYED 
CALL  AAINDX  TO  RECORD  THIS  RUN  IN  THE  RUN  INDEX  FILE 
STOP 
END 


6.26.6  Algorithms 


None 
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6.26.7  Notes  or  Remarks 


The  output  processor  accepts  the  parameter  from  the  PARM  - field  on  the  EXEC 
JCL  statement;  the  format  of  the  parameter  is: 

load-module,  run-index,  prog-lib,  prog-proj,  data-proj,  stats,  persum 


where 


load-module 

run-index 

prog-lib 

prog-proj 

data-proj 

stats 

persum 


is  the  name  of  the  load  module  used  for  this  execution 

is  the  distinguishing  characters  of  the  run  index  file  (the  last 

seven  characters  of  the  third  index  level  of  the  file  name) 

is  the  second  level  of  the  STEPLIB  file  name 

is  the  first  level  of  the  STEPLIB  file  name 

is  the  first  level  of  all  data  files 

is  the  raw  statistics  file  member  name 

is  the  performance  summary  file  member  name 


6.27  AOVEH  - Print  the  Vehicle  Availability  Report 


6.27.1  Identification 
Language:  PARAFOR 

6.27.2  Calling  Sequence 

CALL  AOVEH  (FVEH,  DLPDM,  DLPSTD,  VAVAIL,  VDLTM,  VOP,  VOPD, 
VOPTIM,  INLVL,  KNREG,  KNDM,  KNFL,  KNSUB,  KMREG,  KMDM,  KMFL, 
KMSUB) 

6.27.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region 
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NAME  TYPE  DIM 


ARG  FUNCTION 


FVEH 

14 

ARG 

Data  set  Reference  Number  for  Vehicle  Availability 

report 

HR 

12 

MO 

12 

Current  date  time 

YR 

12 

DAY 

12 

MIN 

12 

DLPDM 

R4 

KMDM 

ARG 

Vehicle  delay  caused  by  failures  occurring  in 

each  demand  period 

VDLTM 

R4 

KMREG 

ARG 

Total  vehicle  delay  caused  by  failures  occurring  in 

KMDM 

each  region  and  demand  period 

VOP 

R4 

KMDM 

ARG 

Vehicle  operating  time  in  each  demand  period 

DLPSTD 

R4 

ARG 

Vehicle  delay  per  day 

INDM 

14 

Index  specifying  demand  period 

INLVL 

14 

ARG 

Index  specifying  level  of  reliability 

INREG 

14 

Index  specifying  region 

VAVAIL 

R4 

ARG 

Vehicle  availability 

VOPD 

R4 

ARG 

Daily  vehicle  operating  time 

6.27.4 

Descripti 

^on 

This  routine  prints  the  Vehicle  Availability  report 


6.27.5  PDL 


SUBROUTINE  AOVEH 
IF 

FVEH  - = 0 
THEN 

CALL  DAYTIM  TO  GET  THE  CURRENT  DATE 

WRITE  THE  TITLE 

FOR 

EACH  DEMAND  INTERVAL  CINDM) 

WRITE  THE  BODY  OF  THE  REPORT 
WRITE  THE  TOTALS 
ENDIF 
RETURN 
END 


6.27.6  Algorithms 


None 


6.27.7  Notes  or  Remarks 


None 
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6.28  APDEL  - Compute  Passenger  Delay  Times  and  Passenger  Availability 

6.28.1  Identification 


Language:  PARAFOR 

6.28.2  Calling  Sequence 


CALL  APDEL  (DMND,  NUMTRP,  PA  VAIL,  SUBFAL,  STDMND,  TRPDMN, 
TRPS,  IND,  KNDL,  KNDM,  KNREG,  KNSUB,  KNFL,  KMDL,  KMDM,  KMREG, 
KMSUB,  KMFL) 

6.28.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DMND 

R4 

KMDM 

ARG 

System  demand  in  each  demand  period 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

NUMTRP 

R4 

KMREG 

ARG 

Number  of  trips  delayed  by  each  delay  range 

IND 

14 

ARG 

Index  specifying  delay  threshhold  above  which 

trips  are  considered  delayed 

PA  VAIL 

R4 

KMDL 

ARG 

Passenger  availability 

SUBFAL 

R4 

KMREG 

ARG 

Subsystem  failures  in  each  region  and  demand  period 

KMDM 

(Total  - not  single  subsystem  element) 

TRPDMN 

R4 

KMDM 

ARG 

Number  of  trips  delayed  by  failures  occurring  in 

KMDL 

each  demand  period 

TRPS 

R4 

KMDL 

ARG 

Number  of  trips  delayed  above  each  threshhold 

INDL 

14 

index  specifying  delay  threshhold 

INDM 

14 

Index  specifying  demand  period 

INFL 

14 

Index  specifying  failure  level 

INREG 

14 

Index  specifying  region 

STDMND 

R4 

ARG 

Daily  system  demand 

INSUB 

14 

Index  specifying  subsystem 

1 - vehicles 

2 - stations 

3 - guideways 

4 - central  management 
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6.28.4  Description 


This  routine  computes  the  passenger  availability.  The  number  of  trips  delayed 
by  demand  period  and  delay  threshhold  (TRPDMN)  is  computed  from  the  number  of  trips 
delayed  per  failure  (NUMTRP)  and  the  expected  number  of  failures.  This  and  the  system 
demand  are  totaled  across  demand  periods  which  are  used  to  compute  passenger  availability. 

6.28.5  PDL 


PROC:  APDEL(IND) 

TRPS(IHD) :=0 
STDMND : =0 
FOR 

EACH  DEMAND  PERIOD (INDM) 

DO 

TRPDMN (INDM, IND) :=0 
FOR 

EACH  REGION CINREG) 

DO 

FOR 

EACH  SUBSYSTEM( INSUB) 

DO 

FOR 

EACH  DELAY  INTERVAL  AFTER  THE  DESIRED 
THRESHOLD (INDL  BEGINNING  WITH  IND) 

DO 

FOR 

EACH  FAILURE  LEVEL (INFL) 

DO 

TRPDMN ( INDM, IND)  = TRPDMN(INDM,  IND)  + 
NUMTRP CINREG, INDM, INDL, INSUB, INFL )* 
SUBFAL  C INREG , INDM , INSUB , INFL ) 

ENDDO 

ENDDO 

ENDDO 

ENDDO 

STDMND: =STDMND+DMND(INDM) 

TRPS C IND ) : =TRPS ( IND ) +TRPDMN ( INDM, IND ) 

ENDDO 

PA VAIL (IND) : =(STDMND-TRPS) /STDMND 
ENDPROC 


6.28.6  Algorithms 


Passenger  availability  is  defined  in  the  User's  Manual  (Section  5.2.7). 

6.28.7  Notes  or  Remarks 


None 


6.29  APHIST  - Compute  Passenger  Availability  for  Different  Threshhold  Levels 


6.29.1  Identification 

Language:  PARAFOR 

6.29.2  Calling  Sequence 

CALL  APHIST  (DMND,  NUMTRP,  PA  VAIL,  SUBFAL,  STDMND,  TRPDMN, 
TRPS,  KNDL,  KNDM,  KNREG,  KNSUB,  KNFL,  KMDL,  KMDM,  KMREG,  KMSUB, 
KMFL) 

6.29.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DMND 

R4 

KMDM 

ARG 

System  demand  in  each  demand  period 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

NUMTRP 

R4 

KMREG 

ARG 

Number  of  trips  delayed  by  each  delay  range 

KMDL 

Region  and  demand  period  resulting  in  each 

KMSUB 

failure  level. 

KMDM 

PA  VAIL 

R4 

KMDL 

ARG 

Passenger  availability 

SUBFAL 

R4 

KMREG 

ARG 

Subsystem  failures  in  each  region  and  demand  period 

TRPDMN 

R4 

KMDM 

ARG 

Number  of  trips  delayed  by  failures  occurring  in 

KMDL 

each  demand  period 

TRPS 

R4 

KMDL 

ARG 

Number  of  trips  delayed  above  each  threshhold 

INDL 

14 

Index  specifying  delay  threshhold 

STDMND 

R4 

ARG 

Daily  system  demand 

6.29.4  Description 


This  routine  computes  passenger  availability  for  each  of  the  delay  threshholds 
requested.  It  does  this  in  calling  APDEL  for  each  delay  threshhold. 
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6.29.5  PDL 


PROC:  APHIST 


FOR 


DO 


EACH  DELAY  THRESHOLD (INDL) 


RUN  APDEL(INDL) 
ENDDO 


ENDPROC  '> 

6.29.6  Algorithms 

None 

6.29.7  Notes  or  Remarks 

None 

6.30  APZERO  - Compute  the  Probability  of  No  Failures  Being  Repaired  at  Same  Time 

6.30.1  Identification 

Language:  PARAFOR 

6.30.2  Cal  ling  Sequence 

CALL  PZERO  = P0  (MRHO,  M) 

6.30.3  Local  Variable  Dictionary 


NAME  TYPE  DIM  ARG  FUNCTION 


M 14 

M RHO  R4 


ARG  Number  of  maintenance  bays 

ARG  Failure  rate  of  active  fleet/repair  rate  (per  bay) 


6.30.4  Description 


This  function  computes  an  intermediate  result  utilized  in  the  maintenance 


fleet  measures. 
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6.30.5  PDL 


PROC:  APZERO 


RUN  AVSUM 
RUN  AVPROD 

PO  = 1/ (PROD/C  1 - P1RH0/M) 
ENDPROC 


+ SUM) 


6.30.6  Algorithms 


None 

6.30.7  Notes  or  Remarks 

This  is  a statement  function  which  is  included  in  the  calling  routine. 


6.31  AREAD  - Read  All  Values 


6.31.1  Identification 


Language:  PARAFOR 
6.31.2  Calling  Sequence 


CALL  AREAD  (STRUC,  DMND,  DLTIME,  FLTSLT,  FRATE,  GWMILE, 
NUMTRP,  PTHRDM,  PNS,  RRATE,  SMFREQ,  SMST,  STATNS,  SYSTIM,  NOTHRD, 
THRIND,  THRESH,  VINSTA,  VM,  VN,  VOPTIM,  KNDM,  KNREG,  KNSUB, 
KNLVL,  KNRD,  KNFL,  KNDL,  KMDM,  KMREG,  KMSUB,  KMLVL,  KMRD, 
KMFL,  KMDL,  SYSPRT) 

6.31  .3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DLTIME 

R4 

KMREG 

KMDM 

ARG 

Vehicle  delay  time  resulting  from  failures  in 

KMSUB 

each  region  and  demand  period  for  each 

KMFL 

subsystem  and  failure  level 

DMND 

R4 

KMDM 

ARG 

System  demand  in  each  demand  period 

FLTSLT 

14 

ARG 

Active  fleet  size  (0  - average,  1 - maximum) 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as 

KMRD 

functions  of  different  causal  factors  for  each 

KMLVL 

level  of  reliability  and  failure  level 

KMFL 
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NAME  TYPE  DIM 


ARG  FUNCTION 


GWMILE 

R4 

KMREG 

ARG 

Guideway  length  in  each  region 

KMDl 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNLVL 

14 

ARG 

Number  of  reliability  levels 

KNRD 

14 

ARG 

Number  of  causal  factors  (5) 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

NOTHRD 

14 

ARG 

Number  of  threshholds 

NUMTRP 

R4 

KMREG 

ARG 

Number  of  trips  delayed  by  each  delay  range 

KMDL 

Region  and  demand  period  resulting  in  each 

KMSUB 

failure  level . 

KMDM 

PTHRDM 

R4 

ARG 

Minimum  passenger  delay  threshhold 

PNS 

R4 

KMREG 

ARG 

Number  of  passengers  leaving  stations  in  each 

KMDM 

region  during  each  demand  interval 

RRATE 

R4 

ARG 

Vehicle  repair  rate  in  each  bay 

SMFREQ 

R4 

ARG 

Scheduled  maintenance  frequency 

SMST 

R4 

ARG 

Scheduled  maintenance  service  time  per  vehicle 

STATNS 

14 

KMREG 

ARG 

Number  of  stations  in  each  region 

SYSPRT 

14 

ARG 

Unit  for  printing  error  messages 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 

THRIND 

R4 

ARG 

Threshhold  increment 

THRESH 

R4 

KMDL 

ARG 

Threshholds 

VINSTA 

R4 

KMREG 

ARG 

Number  of  vehicles  through  stations  in  each 

KMDM 

region  and  demand  period 

VM 

R4 

KMREG 

ARG 

Vehicle  distance  in  each  region  during 

KMDM 

each  demand  period 

VN 

R4 

KMREG 

ARG 

Average  number  of  vehicles  in  each  region 

KMDM 

during  each  demand  period 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region 

KMDM 

and  demand  interval 

STRUC 

14 

ARG 

Data  set  reference  number  containing  structured  data  file 

INRD 

14 

Index  specifying  causal  factor 

INDL 

14 

Index  specifying  delay  threshhold 

INDM 

14 

Index  specifying  demand  period 
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NAME  TYPE  DIM 


ARG  FUNCTION 


INFL  14 

INLVL  14 

INREG  14 

INSUB  14 


Index  specifying  failure  level 
Index  specifying  level  of  reliability 
Index  specifying  region 
Index  specifying  subsystems 


1 - vehicles 

2 - stations 

3 - guideways 

4 - central  management 


6.31.4  Description 


This  routine  reads  the  structured  data  file  which  contains  all  the  inputs  of  the 
model  processor. 


6.31.5  PDL 


PROC:  AREAD 

READ  STRUCTURED  DATA  FILE 
ENDPROC 

6.31 .6  Algorithms 
None 

6.31.7  Notes  or  Remarks 

All  the  statements  for  actually  reading  the  file  are  contained  in  AFSTRC. 
AFSTRC  is  also  used  by  the  input  processor  to  write  the  file  to  simplify  maintaining 
a consistant  format.  The  version  number  (contained  in  AFSTRC)  must  be  incremented 
if  the  format  of  the  file  is  changed. 
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6.32  ARGFAL  - Compute  Failures  for  each  Subsystem 

6.32.1  Identification 
Language:  PARAFOR 

6.32.2  Calling  Sequence 

CALL  ARGFAL  (SUBFAL,  VOPTIM,  F RATE,  PNS,  SYSTIM,  STATNS,  VINSTA, 
C-WMILE,  VM,  INLVL,  KNREG,  KNDM,  KNFL,  KMREG,  KMDM,  KMSUB,  KMLVL, 
KMRD,  KMFL1 

6.32.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as 

KMRD 

functions  of  different  causal  factors  for  each 

KMLVL 

KMFL 

level  of  reliability  and  failure  level 

GWMILE 

R4 

KMREG 

ARG 

Guideway  length  in  each  region 

KM  DM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KN  DM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

PNS 

R4 

KMREG 

ARG 

Number  of  passengers  leaving  stations  in  each 

KMDM 

region  during  each  demand  interval 

STATNS 

14 

KMREG 

ARG 

Number  of  stations  in  each  region 

SYSTIM 

R4 

KMDM 

ARG 

System  operating  time  by  demand  period 

VINSTA 

R4 

KMREG 

ARG 

Number  of  vehicles  through  stations  in  each 

KMDM 

region  and  demand  period 

VM 

R4 

KMREG 

ARG 

Vehicle  distance  in  each  region  during 

KMDM 

each  demand  period 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region 

KMDM 

and  demand  interval 

SUBFAL 

R4 

KMREG 

ARG 

Subsystem  failures  in  each  region  and  demand  period 

(total  - not  single  subsystem  element) 

IN  DM 

14 

Index  specifying  demand  periods 

INF  L 

14 

Index  specifying  failure  level 

INLVL 

14 

ARG 

Index  specifying  level  of  reliability 

IN  REG 

14 

Index  specifying  region 
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6.32.4 


Description 


This  routine  computes  the  expected  number  of  failures  (SUBFAL)  from  the 
failure  rates  (FRATE)  and  various  system  parameters.  The  failures  are  computed  separately 
for  each  subsystem,  reliability  level,  region,  and  demand  period. 

6.32.5  PDL 


PROC:  ARGFAL 
FOR 

EACH  REGION (INREG) 

DO 

FOR 

EACH  DEMAND  PERIOD (INDM) 

DO 

FOR 

EACH  FAILURE  LEVEL (INFL) 

DO 

CCOMPUTE  VEHICLE  FAILURES> 

SUBFAL ( INREG , INDM , 1 , INFL ) := 

VOPTIMC INREG , INDM)*FRATE( 1 , 1 , INLVL , INFL ) 

CCOMPUTE  STATION  FAILURES> 

SUBFAL ( INREG , INDM , 2 , INFL ) : = 

PNS( INREG , INDM )*FRATE (2,2, INLVL . INFL ) + 

SYSTIM( INDM )*STATNS( INREG )*FRATE( 2, 3, INLVL, INFL) + 

VINSTA  ( INREG  , INDM ) *FRATE  C 2 , <* , INLVL , INFL ) 

CCOMPUTE  GUIDEWAY  FAILURES> 

SUBFAL (INREG, INDM, 3, INFL) := 

SYSTIM( INDM )*GWMILE( INREG ) *FR ATE ( 3,3, INLVL,  INFL) 

+ VM ( INREG, INDM )*FR AT E(3, 5, INLVL, INFL) 

CCOMPUTE  CENTRAL  MANAGEMENT  FAILURES> 

SUBFALC INREG , INDM , , INFL ) : =SYSTIM(  INDM ) *FRATE  K , 3 , INLVL , INFL ) 
ENDDO 
ENDDO 
ENDDO 
ENDPROC 


6.23.6  Algorithms 


where 


Vehicle  Failures 
Station  Failures 


Guideway  Failures 


Central  Management  Failures 


a^  * vehicle  operating  time 

a^  * passengers  + 

a^  * operating  time  * stations  + 

a^  * vehicles  through  station 

a^  * guideway  length  * operating  time  + 

a^  * vehicle-miles  travelled 

a * system  operating  time 


a.  are  user  selected  failure  rates 

i 
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6.32.7  Notes  or  Remarks 


None 


6.33  ASCMPR  - Compare  Trips  in  the  Trip  Log 

6.33.1  Identification 
Language:  PARAFOR 

6.33.2  Cal  ling  Sequence 
LOGICAL  ASCMPR,  LT 

LT  = ASCMPR  (TSTRT1,  TSTRT2,  TORIG1,  TORIG2,  TDEST1 , TDEST2, 
TNPNS1,  TNPNS2) 


6.33.3  Local  Variable  Dictionary 


NAME 

TYPE  DIM 

ARG 

FUNCTION 

TDEST1 

12 

ARG 

Destination  station  of  trip  1 

TDEST2 

12 

ARG 

Destination  station  of  trip  2 

TNPNS1 

12 

ARG 

Number  of  passengers  in  trip  1 

TNPNS2 

12 

ARG 

Number  of  passengers  in  trip  2 

TORIG1 

12 

ARG 

Origin  station  of  trip  1 

TORIG2 

12 

ARG 

Origin  station  of  trip  2 

TSTRT1 

R4 

ARG 

Start  time  of  trip  1 

TSTRT2 

R4 

ARG 

Start  time  of  trip  2 

6.33.4 

Description 

This  function  returns  TRUE  if  trip  1 comes  before  trip  2. 


6-67 


6.33.5 


PDL 


FUNCTION  ASCMPR 
IF 

TSTRT1  = TSTRT2 
THEN 
IF 

TORIG1  = TORIG2 
THEN 
IF 

TDEST1  = TDEST2 
THEN 

ASCMPR  = TNPSNS1  .LT.  TNPSNS2 
ELSE 

ASCMPR  = TDEST1  .LT.  TDEST2 
ENDIF 
ELSE 

ASCMPR  = TORIG1  .LT.  TORIG2 
ENDIF 
ELSE 

ASCMPR  = TSTRT1  .LT.  TSTRT2 
ENDIF 
RETURN 
END 


6.33.6  Algorithms 


None 


6.33.7  Notes  or  Remarks 


None 


6,34  ASUBSR  - Compute  Subsystem  Failure  Rates  and  Effect  Rates 

6.34.1  Identification 
Language:  PARAFOR 

6.34.2  Calling  Sequence 

CALL  ASUBSR  (FRATE,  FRATET,  F ERATE,  KNSUB,  KNRD,  KNLVL,  KNFL, 
KN DM,  KNREG,  KNLVL,  KNDL,  KMSUB,  KMRD,  KMLVL,  KMFL,  KMDM,  KMREG, 
KMLVL,  KMDL) 
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6.34.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

FRATE 

R4 

KMSUB 

ARG 

Failure  rates  of  systems  per  unit  time  as 

KMRD 

functions  of  different  causal  factors  for  each 

KMLVL 

KMFL 

level  of  reliability  and  failure  level 

KMDL 

14 

ARG 

Compiled  maximum  number  of  delay  threshholds 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMLVL 

14 

ARG 

Compiled  maximum  number  of  reliability  levels 

KMRD 

14 

ARG 

Compiled  maximum  number  of  causal  factors 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDL 

14 

ARG 

Number  of  delay  threshholds 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNLVL 

14 

ARG 

Number  of  reliability  levels 

KNRD 

14 

ARG 

Number  of  causal  factors  (5) 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

INRD 

14 

Index  specifying  causal  factor 

1 - vehicle  operating  time 

2 - passengers  through  stations 

3 - system  elapsed  time 

4 - vehicles  through  stations 

5 - vehicles- miles  traveled  on  the  guideway 

FERATE 

R4 

KMSUB 

ARG 

Failure  effect  rates  of  subsystems  (failures  of  a 

KMRD 

single  subsystem  element  as  opposed  to  system-wide) 

KMLVL 

per  unit  time  as  functions  of  different  causal 

KMFL 

factors  for  each  level  of  reliability 
1 - stoppage  failures,  2 - degradation  failures 

FRATET 

R4 

KMSUB 

ARG 

Failure  rates  of  subsystems  (failures  of  a single 

KMRD 

subsystem  element  as  opposed  to  system-wide 

KMLVL 

per  unit  time  as  functions  of  different  causal 
factors  for  each  level  of  reliability 

INFL 

14 

Index  specifying  failure  level 

INLVL 

14 

Index  specifying  level  of  reliability 

INSUB 

14 

Index  specifying  subsystem 

1 - vehicles 

2 - stations 

3 - guideways 

4 - central  management 
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6.34.4  Description 


This  routine  computes  the  subsystem  failure  rates  and  the  distribution  of 
failures  between  failure  levels  (e.g.,  degraded  and  failed). 

6.34.5  PDL 


PROC:  ASUBSR 
FOR 

EACH  SUBSYSTEMdNSUB) 

DO 

FOR 

EACH  CAUSAL  FACTOR  CIHRD) 

DO 

FOR 

EACH  LEVEL  OF  RELIABILITY  (INLVL) 

DO 

FRATETdNSUB,  INRD*  INLVL)  =0.0 
FOR 

EACH  FAILURE  LEVEL 
DO 

FRATET( INSUB , INRD,  INLVL)  = FRATET( INSUB , INRD,  INLVL)  + 
FRATE(INSUB,  INRD,  INLVL,  INFL ) 

ENDDO 

FOR 

EACH  FAILURE  LEVEL 
DO 

IF 

FRATETdNSUB,  INRD,  INLVL)  = 0 
THEN 

ferateCinsub,  inrd,  mlvl,  infl)  = 0 
ELSE 

FERATEdNSUB,  INRD,  INLVL,  INFL)  = 

FRATEdNSUB,  INRD,  INLVL,  INFL)/ 

FRATETdNSUB,  INRD,  INLVL) 

ENDIF 

ENDDO 

ENDDO 

ENDDO 

ENDDO 

ENDPROC 


6.34.6  Algorithms 
None 

6.34.7  Notes  or  Remarks 


None 
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6.35  AVDEL  - Compute  Vehicle  Delay  Times  and  Vehicle  Availability 

6.35.1  Identification 
Language:  PARAFOR 

6.35.2  Calling  Sequence 

CALL  AVDEL  (DLPSTD,  VOPD,  DLPDM,  VOP,  VDLTM,  SUBFAL,  DLTIME, 
VOPTIM,  VAVAIL,  KN DM,  KNREG,  KNSUB,  KNFL,  KMDM,  KMREG,  KMSUB, 
KMFL) 


6.35.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

DLTIME 

R4 

KMREG 

KMDM 

ARG 

Vehicle  delay  time  resulting  from  failures  in 

KMSUB 

each  region  and  demand  period  for  each 

KMFL 

subsystem  and  failure  level 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

VOPTIM 

14 

KMREG 

ARG 

Total  vehicle  operating  time  in  each  region 

KMDM 

and  demand  interval 

DLPDM 

R4 

KMDM 

ARG 

Vehicle  delay  caused  by  failures  occurring  in 

each  demand  period 

SUBFAL 

R4 

KMREG 

ARG 

Subsystem  failures  in  each  region  and  demand  period 

KMDM 

KMSUB 

(total  - not  single  subsystem  element) 

KMFL 

1 - stoppage  failures,  2 - degradation  failures 

VDLTM 

R4 

KMREG 

ARG 

Total  vehicle  delay  caused  by  failures  occurring  in 

KMDM 

each  region  and  demand  period 

FOP 

R4 

KMDM 

ARG 

Vehicle  operating  time  in  each  demand  period 

DLPSTD 

R4 

ARG 

Vehicle  delay  per  day 

INDM 

14 

Index  specifying  demand  period 

INFL 

14 

Index  specifying  failure  level 

INREG 

14 

Index  specifying  region 

VAVAIL 

R4 

ARG 

Vehicle  availability 
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NAME  TYPE  DIM  ARG  FUNCTION 


VOPD  R4  ARG  Daily  vehicle  operating  time 

INSUB  14  Index  specifying  subsystem 

1 - vehicles 

2 - stations 

3 - guideways 

4 - central  management 

6.35.4  Description 

The  expected  vehicle  delay  (for  each  region  and  for  each  demand  period) 
is  computed  from  the  expected  number  of  failures  (SUBFAL)  and  the  delay  expected 
for  each  failure.  Vehicle  delay  and  vehicle  operating  time  are  accumulated  over 
all  regions  and  all  demand  periods.  The  total  vehicle  delay  and  total  operating  time 
are  used  to  compute  vehicle  availability. 

6.35.5  PDL 


PROC:  AVDEL 
DLPSTD : =0 
VOPD: =0 
FOR 

EACH  DEMAND  PERIOD(INDM) 

DO 

DLPDM(INDM) :=0 
VOP(INDM) :=0 
FOR 

EACH  REGION(INREG) 

DO 

VDLTM(INREG.INDM) :=0 
FOR 

EACH  SUBSYSTEM ( INSUB) 

DO 

FOR 

EACH  FAILURE  LEVEL(INFL) 

DO 

VDLTM( INREG , INDM ) : =VDLTM( INREG , INDM ) + 

FKmnnUBFAL ( INREG  ' INDri * INSUB , INFL  )*DLTIME ( INREG , INDM , INSUB , INFL ) 

L*n  i/U  U 

ENDDO 

DLPDM(INDM) : =DLPDM( INDM) +VDLTM( INREG , INDM) 

VOP ( INDM) : =VOP( INDM) +VOPTIMC INREG , INDM) 

ENDDO 

DLPSTD : =DLPSTD+DLPDM(INDM) 

VOPD: =VOPD+VOP(INDM) 

ENDDO 

V AVAIL : = ( VOPD-DLPSTD ) /VOPD 
ENDPROC 
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6.35.6 


Algorithms 


Vehicle  availabi  lity  is  computed  as  shown  in  the  User's  Manual . 


6.35.7  Notes  or  Remarks 


None 


6.36  AVFLSZ  - Compute  Maintenance  and  Standby  Fleet  Measures 
6.36.1  Identification 


Language:  PARAFOR 


6.36.2 

Calling  Sequence 

CALL  AVFLSZ  (SYSTIM, 

, AVSMF,  VOPD,  SMFREQ,  SMST,  SUBFAL,  MMBAYS 

VFFREQ, 

, RRATE,  MNV,  ’ 

VN,  AVNV,  FLTSLT,  AFLSZ,  NETRAT,  AVMFLT,  FMF,  PROB, 

KNDM, 

KNREG,  KNSUB 

, KNFL, 

KNSFS,  KNSB,  KMDM,  KMREG,  KMSUB,  KMFL, 

KMSFS, 

KMSB,  DEBUG, 

SYSERR, 

BAYS,  SF) 

6.36.3 

Local  Variable 

Dictionary 

NAME 

TYPE  DIM 

ARG 

FUNCTION 

FLTSLT 

14 

ARG 

Active  fleet  size  (0-  average,  1 - maximum) 

KMDM 

14 

ARG 

Compiled  maximum  number  of  demand  periods 

KMFL 

14 

ARG 

Compiled  maximum  number  of  failure  levels 

KMREG 

14 

ARG 

Compiled  maximum  number  of  regions 

KMSUB 

14 

ARG 

Compiled  maximum  number  of  subsystems 

KNDM 

14 

ARG 

Number  of  demand  periods 

KNFL 

14 

ARG 

Number  of  failure  levels 

KNREG 

14 

ARG 

Number  of  regions 

KNSUB 

14 

ARG 

Number  of  subsystems  (4) 

RRATE 

R4 

ARG 

Vehicle  repair  rate  in  each  bay 

SMFREQ 

R4 

ARG 

Scheduled  maintenance  frequency 

SMST 

R4 

ARG 

Scheduled  maintenance  service  time  per  vehicle 

SYSTIM 

R4  KMDM 

ARG 

System  operating  time  by  demand  period 

VN 

R4  KMREG 

ARG 

Average  number  of  vehicles  in  each  region 

DEBUG 

14 

ARG 

I/O  unit  for  debug  output  (0  - omit  debug  output) 

STD 

R4 

Length  of  operating  day 

TNV 

R4 

Temporary  variable 

DMNV 

R4 

Temporary  variable 
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NAME  TYPE  DIM  ARG  FUNCTION 


INCR1 

14 

Temporary  variable 

INCR2 

14 

Temporary  variable 

PZERO 

R4 

po 

PRCENT 

R4 

Temporary  variable 

VFAILD 

R4 

Temporary  variable 

BAYS 

14 

KMSB 

ARG 

Number  of  service  bays  being  considered 

FMF 

R4 

FMSB 

ARG 

Failure  maintenance  fleet  sizes  for  different  numbers 

of  maintenance  bays 

MNV 

R4 

ARG 

Maximum  number  of  vehicles 

NETRAT 

R4 

ARG 

Net  rate  of  vehicle  failures  using  a single  bay 

PROB 

R4 

KMSB 

ARG 

The  probabilities  that  ten  different  standby 

KMSFS 

fleet  sizes  are  adequate  given  ten  different 

numbers  of  service  bays 

SF 

14 

KMSFS 

ARG 

Service  fleet  size  being  considered 

SUBFAL 

R4 

KMREG 

ARG 

Subsystem  failures  in  each  region  and  demand  period 

AFLSZ 

R4 

ARG 

Active  fleet  size 

AVNV 

R4 

ARG 

Average  number  of  vehicles 

AVSMF 

R4 

ARG 

Average  scheduled  maintenance  fleet  size 

IN  DM 

14 

Index  specifying  demand  period 

INFL 

14 

Index  specifying  failure  level 

INREG 

14 

Index  specifying  region 

KMSB 

14 

ARG 

Maximum  number  of  different  numbers  of  service  bays 

KMSFS 

14 

ARG 

Maximum  number  of  standby  fleet  sizes 

KNSB 

14 

ARG 

Number  of  different  numbers  of  service  bays 

KNSFS 

14 

ARG 

Number  of  standby  fleet  sizes 

MMBAYS 

14 

ARG 

Minimum  maintenance  bays 

VFFREQ 

R4 

ARG 

Average  vehicle  failure  frequency 

VOPD 

R4 

ARG 

Daily  vehicle  operating  time 

6.36.4 

Description 

This  routine  computes  maintenance  and  standby  fleet  measures.  First,  the 
operating  day  length,  the  average  scheduled  maintenance  fleet,  the  average  failure 
maintenance  fleet,  and  the  active  fleet  size  are  computed.  From  these  the  minimum 
number  of  bays  required  to  complete  the  maintenance  work  is  computed.  Finally,  the 
probability  of  various  fleet  sizes  and  service  facility  sizes  being  adequate  to  maintain 
the  active  fleet  is  computed. 
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PROC:  AVFLSZ 

STD : =0  <COMPUTE  LENGTH  OF  STANDARD  DAY> 

FOR 

EACH  DEMAND  PERIOD (INDM) 

DO 

STD : =STD+SYSTIM ( INDM ) 

ENDDO 

<COMPUTE  AVERAGE  SCHEDULED  MAINTAWENCE  FLEET  SIZE> 

AVSMF : =VOPD*SMFREQ*SMST/STD 
<COMPUTE  AVERAGE  FLEET  FAILURE  RATE> 

VFAILD : =0 
FOR 

EACH  DEMAND  PERIOD(INDM) 

DO 

FOR 

EACH  REGION(INREG) 

DO 

FOR 

EACH  FAILURE  LEVELCINFL) 

DO 

VFAILD : = VFAILD+SUBFAL( INREG , INDM , 1 , INFL ) 

ENDDO 

ENDDO 

ENDDO 

VFFREQ : =VFAILD/STD 

MMBAYS : =INTEGER ( AVSMF+ VFFREQ*RRATE* 1 ) <OBTAIN  NEXT  HIGHER  INTEGER> 

MNV:=0 

TNV : =0 

FOR 

EACH  DEMAND  PERIOD (INDM) 

DO 

DMNV : =0 
FOR 

EACH  REGION (INREG) 

DO 

DMNV : =DMNV+VN( INREG , INDM) 

ENDDO 

TNV : =TNV+DMNV*SYSTIM( INDM) 

MNV  = MAX  (DMNV,  MNV ) 

ENDDO 

AVNV : =TNV/STD 

IF  <USER  SELECTS  MAXIMUM  FLEET  SIZE> 

FLTSLT=1 

THEN 

AFLSZ: =MNV 
ELSE 

AFLSZ: = AVNV 
ENDIF 

NETRAT : =VFFREQ*RRATE 

FOR  <BAYS  IN  INCREMENTS  OF  20  PERCENT> 

BAYS : =MMBAYS+MMBAYS* . 2*INCR1  AS  INCR1  GOES  FROM  0 TO  9 IN  STEPS  OF  1 
DO 

PRCENT : = 0 
INCR2 : =0 
RUN  APZERO 
RUN  AVFMF 

AVMFLT(INCRl) :=FMF(INCR1)+AVSMF 
DO 

INCR2 : =INCR2+1 
IF 

PRCENT<2 

THEN 

PRCENT :=PRCENT+1 
ELSE 
IF 

PRCENT  >=  2 AND  PRCENT  < 10 
THO( 

PRCENT:  =PRCENT+ 2 
ELSE 

PRCENT: =PRCENT+ 10 
ENDIF 
ENDIF 

SF : =AFLSZ*PRCENT/ 100. 

RUN  PRBCMP 
UNTIL 

PRCENT  .GE.  50 
ENDDO 
ENDDO 
ENDPROC 
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6.36.6 


Algorithms 


The  equations  utilized  are  discussed  in  Section  2.2. 
6.36.7  Notes  or  Remarks 


N one 


6.37  AVFMF  - Compute  failure  maintenance  fleet 

6.37.1  Identification 
Language:  PARAFOR 

6.37.2  Cal  ling  Sequence 

FMF  = AVFMF  (M  RHO,  M) 

6.37.3  Local  Variable  Dictionary 

NAME  TYPE  DIM  ARG  FUNCTION 

M 14  ARG  Number  of  maintenance  bays 

M RFIO  R4  ARG  Failure  rate  of  active  fleet/repair  rate  (per  bay) 

6.37.4  Description 


This  function  computes  the  failure  maintenance  fleet  size,  i.e.,  the  number 
of  vehicles  that  are  inoperable. 

6.37.5  PDL 


PROC:  AVFMF 
CALL  AVPROD 
CALL  AVSUtt 

AVFMF  = PQ#((M*#3  ♦ (M-M**2 )*MRHO)/(M  - MRH0)**2  * PROD  + MRHO  * SUM) 
ENDPROC 

6.37.6  Algorithms 

See  Section  2.2 . 

6.37.7  Notes  or  Remarks 


This  is  a statement  function  and  is  included  in  the  calling  program. 
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6.38  AVPRB  - Compute  the  Probability  that  the  Standby  Fleet  SF  is  adequate  to  maintain 
the  Active  Fleet  Size  Chosen 

6.38.1  Identification 
Language:  PARAFOR 

6.38.2  Calling  Sequence 

PROB  = AVPRB  (K,  M,  M RHO,  PQ) 


6.38.3  Local  Variable  Dictionary 


NAME 

TYPE  DIM 

ARG 

FUNCTION 

K 

14 

ARG 

Standby  fleet  size  +1 

M 

14 

ARG 

Number  of  maintenance  bays 

M RHO 

R4 

ARG 

Failure  rate  of  active  fleet/repair  rate  (per  bay) 

po 

R4 

ARG 

po 

6.38.4 

Description 

This  function  computes  the  probability  that  the  standby  fleet  size  will  be 
adequate  to  maintain  the  active  fleet,  i.e.,  a spare  vehicle  will  be  available  when 
needed. 


6.38.5  PDL 


PROC:  AVPRB 

IF  <STANDBY  FLEET  RELATIVE  TO  NUMBER  OF  BAYS> 

K<M 

THEN 

CALL  AVSUM 
AVPRB  = PO  # SUM 

FT  <?F 

CALL  AVPROB 

= 1 ~ PO  # PRQD#(MRHO/M)#*(K-M)/( 1-MRHQ/M) 

LNDXr 

ENDPROC 


6.38.6  Algorithms 


See  Section  2 .2 . 


6.38.7  Notes  or  Remarks 


None 
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6.39  AVPROD  - Compute  MRHO**N/N  ! 


6.39.1  identification 
Language:  PARAFOR 

6.39.2  Calling  Sequence 

PROD  = AVPROD  (MRHO,  N) 

6.39.3  Local  Variable  Dictionary 

NAME  TYPE  DIM  ARG  FUNCTION 


Partial  product  and  result 
Index 

ARG  See  definit’on 

ARG  See  definition 

6.39.4  Description 


AVPROD  R4 
I 14 

MRHO  R4 
N 14 


This  function  computes  MRHO**N/N  I in  a manner  that  avoids  overflow  for 
reasonable  values. 


6.39.5  PDL 


FUNCTION  AVPROD 
AVPROD  = 1 
IF 

N > 0 
THEN 
FOR 

I FROM  1 TO  H 
DO 

AVPROD  = AVPROD  # MRHO/I 
ENDDO 
ENDIF 
RETURN 
END 


6.39.6  Algorithms 

AVPROD  = (MRnH,°)N 


6.39.7  Notes  or  Remarks 


None 
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6.40  AVSUM  - Compute  the  Summation  of  MRHO**l/l ! for  I = 1 , . . . ,N 

6.40.1  Identification 
Language:  PARAFOR 

6.40.2  Calling  Sequence 

SUM  = AVSUM  (M  RHO,  N) 

6.40.3  Local  Variable  Dictionary 


NAME 

TYPE  DIM 

ARG 

FUNCTION 

AVSUM 

R4 

Partial  sum  and  result 

1 

14 

Index 

M RHO 

R4 

ARG 

Input  parameter 

N 

14 

ARG 

Input  parameter 

PROD 

R4 

M RHO  **  I/I ! 

6.40.4 

Description 

This  function  computes  the  summation  of  M RHO**N/N  ! in  a manner  that 
avoids  overflow  for  reasonable  values. 


6.40.5  PDL 


SUBROUTINE  AVSUM 
AVSUM  = 0 
PROD  = 1 
IF 

N > 0 
THEN 
FOR 

I FROM  1 TO  N 
DO 

PROD  = PROD  * MRHO/I 

AVSUM  = AVSUM  + PROD 
ENDDO 
ENDIF 
RETURN 
END 


6.40.6  Algorithms 

N , 

AVSUM  = '^2 

i = 1 

6.40.7  Notes  or  Remarks 


None 
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6.41  DAYTIM  - Obtain  Date  and  Time 


6.41.1  Identification 

» DAYTIM  - Convert  Date  and  Time 

• IBM/FSD  - July  1 , 1977 

• PARAFOR 


6.41 .2  Argument  Dictionary 


NAME 

TYPE  DIM 

ARG  FUNCTION 

MM 

1*2 

(OUTPUT)  MONTH 

DD 

1*2 

(OUTPUT)  DAY 

YY 

1*2 

(OUTPUT)  YEAR 

HH 

1*2 

(OUTPUT)  HOURS 

MM 

1*2 

(OUTPUT)  MINUTES 

SS 

1*2 

(OUTPUT)  SECONDS 

6.41.3 

Local  Variable 

Dictionary 

NAME 

TYPE  DIM 

ARG  FUNCTION 

YEAR 

1*4  2 

Century  and  year  of  century 

HMS 

1*4  3 

Hours,  minutes,  seconds 

SS 

1*4 

Seconds 

LEAP 

1*4 

indicates  leap  year 

6.41.4 

Description 

The  purpose  of  DAYTIM  is  to  obtain  the  Julian  date  and  time  from  the 

system  clock  and  return  the  calendar  date  and  time.  DAYTIM  calls  DTIMEL 
via  entry  point  TIMES  to  obtain  the  Julian  date  and  time  from  the  system  clock. 

The  returned  year  is  then  tested  for  leap  year  with  the  MOD  function  to  determine 
which  calendar  conversion  to  use.  The  calendar  conversion  then  uses  the  day  of  the 
year  to  find  the  month  of  the  year  and  the  day  of  the  month. 

6.41.5  PDL 


None 

6.41  .6  Algorithms 


None 
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6.41 .7  Notes  or  Remarks 


None 


6.42  DTIMEL  - Read  System  Clock 


6.42.1  Identification 


® DTIMEL  - Read  System  Clock  for  Date  and  Time 


• 

IBM/FSD 

- July  1 

, 1977 

e 

ASM 

6.42.2 

Argument  Dictionary 

NAME 

TYPE 

DIM 

ARG 

FUNCTION 

TIMES: 

YEAR 

1*4 

2 

(OUTPUT)  YEAR,  JULIAN  DAY 

HMS 

1*4 

3 

(OUTPUT)  HOURS,  MINUTES,  AND  SECONDS 

SEC 

1*4 

(OUTPUT)  TIME  OF  DAY  IN  SECONDS 

DELT 

1*4 

(OUTPUT)  ELAPSED  TIME  SINCE  LAST  CALL 

TO  TIMES  IN  SECONDS) 

6.42.3 

Local  Variable 

Dictionary 

NAME 

TYPE 

DIM 

ARG 

FUNCTION 

TA 

1*4 

Seconds  of  the  day 

DBL 

1*4 

2 

Packed  decimal  date  and  time 

YIM 

1*4 

2 

Century  and  year  of  century 

HIM 

1*4 

3 

Hours,  minutes,  seconds 

6.42.4 

Description 

DTIMEL  is  called  by  DAYTIM  to  read  the  system  clock  and  return  the  current 
Julian  date  and  time.  DTIMEL  calls  the  system  TIME  macro  to  get  the  date  and  time  in 
EBCDIC.  The  routine  then  converts  the  date  and  time  to  binary  and  returns  to  the 

calling  program. 
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6.42.5 


PDL 


None 

6.42.6  Algorithms 
None 

6.42.7  Notes  or  Remarks 
None 

6.43  FASPAR  - Parameter  Field  Processing 

6.43.1  Identification 
Language:  Assembler 

6.43.2  Calling  Sequence 

INTEGER,  ADDR,  FASPAR 
ADDR  = FASPAR  (0) 

CALL  FAGETP  (ADDR,  PARMNO,  PARM,  LENGTH) 

6.43.3  Local  Variable  Dictionary 

None 

6.43.4  Description 

FASPAR  returns  the  address  of  the  parameter  passed  to  the  main  program  by  the 
system.  It  does  this  by  tracing  back  through  the  save  areas.  It  must  be  called  from  the 
main  program  to  operate  correctly.  Its  result  is  only  useful  to  FAGETP. 

FAGETP  returns  a subfield  from  the  parameter  pointed  to  by  ADDR  (obtained 
from  FASPAR).  The  subfields  are  separated  by  commas.  PARMNO  is  the  number  of  the 
subfield  to  return.  All  characters  between  the  commas  will  be  returned  unless  LENGTH 
is  exceeded,  in  which  case,  the  first  LENGTH  characters  are  returned.  If  LENGTH  is 
omitted  from  the  parameter  list,  a length  of  eight  is  assumed. 

6.43.5  PDL 
None 
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6.43.6 


Algorithms 


None 

6.43.7  Notes  or  Remarks 


None 


6.44  FIERR  - Process  Undefined  GDIP  Variables 

| 


6.44.1 


6.44.2 


Identification 


Language:  PARAFOR 
Calling  Sequence 


CALL  FIERR  (LVL,  PGM,  LEN,  MSG) 


6.44.3  Local  Variable  Dictionary 


NAME 

TYPE 

DIM 

ARG 

FUNCTION 

CHAR 

12 

First  character  of  input  record 

DIGIT 

12 

11 

Digits  in  EBCDIC  (constant) 

ERRFLG 

LI 

Flag  set  upon  error 

ERRPRT 

14 

Unit  for  error  message 

FILL 

LI 

4 

Constant  for  error  message 

IMAGE 

14 

20 

Image  of  input  record  (character) 

LEN 

14 

ARG 

Length  of  error  message 

LVL 

12 

ARG 

Level  of  error  (character) 

MSG 

LI 

LEN 

ARG 

The  error  message  itself 

PGM 

12 

ARG 

The  program  ID  (2  characters) 

PURGED 

LI 

Flag  to  determine  end  of  purge 

SYSIN 

14 

Not  used 

SYSPRT 

14 

Unit  to  which  to  echo  purged  cards 

6.44.4 

Description 

This  routine  generates  the  error  message  if  a GDIP  error  occurs,  and  skips 
cards  until  another  variable  name  is  found. 
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6.44.5 


PDL 


PROC  FIERR 

WRITE  MSG  TO  SYSPRT 
IF 

SYSPRT  / ERRPRT 
THEN 

WRITE  MSG  TO  ERRPRT 
ENDIF 

ERRFLG  = TRUE 
DO 

READ  IMAGE  FROM  UNIT  5 
IF 


FIRST  CHARACTER  IS  NOT  ALPHABETIC 
THEN 

WRITE  IMAGE  TO  ERRPRT 
IF 


ERRPRT  / SYSPRT 
THEN 

WRITE  IMAGE  TO  SYSPRT 
ENDIF 
ENDIF 
UNTIL 

FIRST  CHARACTER  IS  ALPHABETIC 
ENDDO 

BACK  SPACE  UNIT  5 ONE  RECORD 
END 


6.44.6  Algorithms 
None 

6.44.7  Notes  or  Remarks 

The  common  block  ERRORS  is  used  to  communicate  error  parameters  to  a higher 
level  program  because  FIERR  is  called  from  GDIP  which  does  not  accept  these  parameters. 
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6.45  XGDIPF4  - Read  Full  Word  GD1P  Data 

6.45.1  Identification 

o XGD1PF4  - Read  Full  Word  GDIP  Data 

o 1BM/FSD  - July  1,  1977 

o PARAFOR 

6.45.2  Argument  Dictionary 


VARIABLE 

DIM 

TYPE 

DESCRIPTION 

ARRAY 

IDA, 

IDB, 
I DC , 
IDD 

1*4 

Array  into  which 

the  data  is  to  be  read 

IDA 

- 

1*4 

Maximum  value  of 

first  dimension 

IDB 

- 

1*4 

Maximum  value  of 

second  dimension 

I DC 

- 

1*4 

Maximum  value  of 

third  dimension 

IDD 

- 

1*4 

Maximum  value  of 

fourth  dimension 

FMT 

2 

1*4 

Format  of  data  on  input  record 

JRAL 

- 

1*4 

Beginning  value 

of  first  dimension 

JRAH 

- 

1*4 

Ending  value  of 

first  dimension 

JRBL 

- 

1*4 

Beginning  value 

of  second  dimension 

JRBH 

- 

1*4 

Ending  value  of 

second  dimension 

JRCL 

- 

1*4 

Beginning  value 

of  third  dimension 

JRCH 

- 

1*4 

Ending  value  of 

third  dimension 

JRDL 

- 

1*4 

Benginning  value 

of  fourth  dimension 

JRDH 

- 

1*4 

Ending  value  of 

fourth  dimension 
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6.45.3  Loo  a I Variable  Dictionary 


VARIABLE 

DIM 

TYPE 

DESCRIPTION 

BUFFER 

20 

1*4 

Input  buffer 

DUMP 

- 

1*4 

The  characters  ’DUMP' 

ENT 

78 

1*4 

Contents  of  input  buffer  in  specified 
format 

FORMAT 

4 

1*4 

Format  of  data  on  input  record 

IRAH 

- 

1*4 

Ending  value  of  first  dimension 

IRAL 

- 

1*4 

Beginning  value  of  first  dimension 

IRBH 

- 

1*4 

Ending  value  of  second  dimension 

IRBL 

- 

1*4 

Beginning  value  of  second  dimension 

IRCH 

- 

1*4 

Ending  value  of  third  dimension 

IRCL 

- 

1*4 

Beginning  value  of  third  dimension 

IRDH 

- 

1*4 

Ending  value  of  fourth  dimension 

IRDL 

- 

1*4 

Beginning  value  of  fourth  dimension 

LENGTH 

- 

1*2 

Defined  length  of  input  buffer  in  bytes 

NBYTES 

- 

1*2 

Number  of  bytes  currently  usable  in 
input  buffer 

NCOPY 

- 

1*4 

Number  of  times  an  input  record  is  to 
be  read 

NOENT 

_ 

1*4 

Number  of  entries  in  input  buffer 

6.45.4  Description 

This  routine  reads  data  in  GDIP  format  into  full  word  variables. 
The  input  record  is  read  as  a replication  factor  (first  two  columns) 
followed  by  a character  string  into  the  input  buffer.  A pseudo  read  is 
then  performed  on  the  input  buffer  to  format  the  data  and  store  it  into 
the  specified  variable.  The  replication  factor  controls  the  number  of 
times  the  pseudo  read  is  performed. 
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6.45.5  PPL 
None 

6.45.6  Algorithms 
None 

6.45.7  Notes  or  Remarks 
None 


XNDBOR  - Generalized  Data  Input  Processing 
Identification 

• XNDBOR  - Generalized  Data  Input  Processing 


6.46 

6.46.1 


• IBM/FSD  - July  1,  1977 

• PARAFOR 

6.46.2  Argument  Dictionary 

6.46.3  Local  Variable  Dictionary 


VARIABLE 

DIM 

TYPE 

END 

- 

R*8 

FMT 

- 

R*8 

I RAH 

- 

1*4 

IRAL 

- 

1*4 

IRBH 

- 

1*4 

IRBL 

- 

1*4 

IRCH 

- 

1*4 

IRCL 

- 

1*4 

IRDH 

- 

1*4 

IRDL 

- 

1*4 

NAME 

_ 

R*8 

DESCRIPTION 

The  characters  ' END' 

Format  of  the  data 
Ending  value  of  first  dimension 
Beginning  value  of  first  dimension 
Ending  value  of  second  dimension 
Beginning  value  of  second  dimension 
Ending  value  of  third  dimension 
Beginning  value  of  third  dimension 
Ending  value  of  fourth  dimension 
Beginning  value  of  fourth  dimension 
Name  of  the  variable 
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6.46.4  Description 


This  routine  reads  the  name  card  of  data  that  is  defined  in  the 
GDIP  format.  The  name  card  contains  the  name  of  the  variable  to  be 
initialized,  the  format  of  the  data  and  the  lower  and  upper  bounds  of  up 
to  four  dimensions  which  define  the  portion  of  the  variable  to  be  initial- 
ized. This  information  is  passed  to  routine  GDIP4  (see  subsection 
6.1.16),  which  determines  the  type  of  the  variable  and  calls  the  proper 
routine  to  read  the  data  into  the  variable.  Routine  XNDBOR  continues 
until  a record  containing  the  characters  END  in  the  first  three  columns 
is  read. 


6.46.5  PPL 
None 

6.46.6  Decision  Tables  and  Algorithms 
None 

6.46.7  Notes  or  Remarks 
None 


6.47  XPSEUDO  - I/O  Intercept  Routine 
6.47.1  Identification 

• XPSEUDO  - I/O  Intercept  Routine 

• IBM/ESD  - July  I,  1977 

• ASM 
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6.47.2  Argument  Dictionary 


6.47.3 


ENTRY 

VARIABLE 

DIM 

TYPE 

DESCRIPTION 

PFIOCS 

PARM  1 

- 

L*1 

Type  of  I/O  operation 
requested 

PARM  2 

4 

L*1 

Data  set  reference  number 

PARM  3 

- 

L*1 

Type  of  I/O 

SUDOGO 

LENGBUF 

- 

1*2 

Current  number  of  characters 
in  buffer 

BUFSIZ 

- 

1*2 

Defined  size  of  buffer 

BUFFER 

20 

1*4 

The  buffer 

Local  Variable  Dictionary 

VARIABLE 

DIM 

TYPE 

DESCRIPTION 

ASUDOBF 

- 

1*4 

Address  of  COMMON/SUDOBF/ 

BUFLOC 

- 

1*4 

Current  I/O  position  in  buffer 

CURUNIT 

- 

L*1 

Current  data  set  reference  numbe 

FIOCSB 

- 

1*4 

Address  of  true  FIOCS 
routine 

1256 

- 

1*4 

The  value  256 

ONE 

- 

1*4 

The  value  1 

SAVE 

16 

1*4 

Register  save  area 

SIX 

- 

1*4 

The  value  6 
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6.47.4  Description 


This  routine  provides  pseudo  input  operations  for  the  simulation, 
which  are  performed  during  the  read  of  data  in  the  Generalized  Data 
Input  Package  ( GD IP)  format.  Entry  SUDOGO  is  called  by  one  of  the  GDIP 
read  routines  (XGDIPF4,  XGDIPH4 , XGDIPX4)  to  receive  the  location  and 
size  of  the  pseudo  input  buffer.  SUDOGO  also  alters  IBCOM  so  that  all 
calls  to  FIOCS  will  come  to  entry  point  PFIOCS  in  this  routine  first. 

Then,  for  each  FORTRAN  I/O  request,  entry  PFIOCS  will  be  called.  If  the 
data  set  reference  number  in  the  READ  or  WRITE  statement  is  not  zero, 
PFIOCS  calls  the  normal  FIOCS  routine.  If  the  data  set  reference  number 
in  a READ  statement  is  zero,  pseudo  input  is  required  and  PFIOCS  supplies 
the  character  string  in  the  pseudo  input  buffer  as  the  result  of  the 
read  operation.  The  character  string  is  formatted  as  in  a normal  read 
to  convert  it  to  numerical  data.  The  following  major  steps  occur  during 
a GDIP  read: 

1.  A GDIP  read  routine  calls  SUDOGO  to  define  the  pseudo  input 
buffer  and  intercept  normal  FORTRAN  I/O  calls. 

2.  The  GDIP  read  routine  performs  a normal  read  (data  set  refer- 
ence equal  to  five)  of  one  record  which  consists  of  a replication 
factor  (columns  1 and  2)  and  78  columns  of  data.  The  data  is 
read  as  a character  string  into  the  pseudo  input  buffer. 

3.  The  GDIP  read  routine  then  performs  a read  with  the  data  set 
reference  number  equal  to  zero.  PFIOCS  recognizes  this  as  a 
pseudo  read  and  returns  the  contents  of  the  pseudo  input  buffer 
in  the  specified  format  as  the  result  of  the  read  operation. 

The  GDIP  read  routine  performs  the  pseudo  read  the  number  of 
times  indicated  by  the  replication  factor  and  then  continues 

at  step  2 until  all  of  the  data  for  the  specified  array  has 
been  read. 

6.47.5  PDL 


None 

6.47.6  Algorithms 
None 

6.47.7  Notes  or  Remarks 


None 
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7.0  GLOSSARY 


Asynchronous 


Operation  of  vehicles  under  velocity  control  or  in  the  vehicle-follower  mode  with 
q^eed  changes  allowed  to  prevent  potential  merge  conflicts. 


Automated  Guideway  Transit  (AGT) 


Computer-controlled  transit  system  operating  in  demand  or  scheduled  service  on  a 
fixed,  exclusive  guideway. 


Automated  Rail  Transit  (ART) 


A class  of  AGT  systems  which  provides  multiple-stop  service,  carries  at  least  100 
passengers  in  its  minimum  train  consists,  operates  at  speeds  equal  to  or  greater  than  55 
km/h,  and  generally  runs  at  headways  of  more  than  1 minute. 


Availability-Factor  Relationships 

The  sensitivity  of  the  vehicle  and  passenger  availability  measures  to  changes  in 
parameters  which  affect  either  system  reliability  or  failure  management  strategy. 

Average  Queue  Transit  Time  (TQ) 


Average  time  required  to  move  through  a platform  boarding  queue  during  a period 
of  congestion  such  as  the  peak  hour.  For  a particular  station  the  value  is  calculated  as 
the  difference  between  the  average  wait  time  and  one-half  the  average  route  headway. 

Capital  Cost  (base  year) 

The  initial  cost  of  deploying  a system  expressed  in  base  year  (1977)  dollars.  Capi- 
tal cost  is  the  sum  of  guideway  construction  cost,  passenger  station  construction  and 
equipment  cost,  AGT  vehicle  cost,  central  control  construction  and  equipment  cost, 
maintenance  facility  construction  and  equipment  cost,  power  distribution  system  installa- 
tion cost,  and  feeder  system  costs  including  vehicles,  maintenance  facilities,  and  con- 
trol facilities. 
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Catalogued  Procedure 


A pre-coded  set  of  Job  Control  Language  (XL)  statements  that  is  assigned  a name, 
placed  in  a data  set,  and  may  be  retrieved  and  executed  by  one  XL  statement. 


Central  Business  District  (CBD) 


The  downtown  retail  trade  area  of  a city.  As  defined  by  the  Census  Bureau,  the 
CBD  is  an  area  of  very  high  land  valuation  characterized  by  a high  concentration  of  re- 
tail business  offices,  theaters,  hotels,  and  service  businesses,  and  by  a high  traffic  flow. 


Central  City  (CC)  of  an  SMSA 

The  largest  city  in  an  SMSA.  One  or  two  additional  cities  may  be  secondary 
Central  Cities  in  the  SMSA. 


Central  City  (CC)  of  an  Urbanized  Area  (UA) 

A city  of  at  least  50,000  persons  within  closely  settled  incorporated  and  unincor- 
porated areas  that  meet  the  criteria  for  urbanized  ring  (fringe)  areas.  A few  UA's  con- 
tain twin  cities  with  a combined  population  of  at  least  50,000. 


Central  City  Ring  (CCR) 

The  portion  of  a Central  City  not  included  in  the  CBD. 

Checkpoint  File 

A file  created  at  a user-specified  time  by  the  Model  Processor  and  containing  all 
data  necessary  to  restart  the  MP  from  that  time. 


Closed-Loop  Control 

Advancement  of  vehicles  under  generated  control  based  upon  the  estimated  system 

state. 

Control  Block 

A ^ecific  section  of  guideway  corresponding  to  a single  control  segment  of  a fixed 
block  vehicle  regulation  and/or  headway  protection  system. 
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Cruise  Speed 

The  constant  velocity  at  which  a vehicle  travels  after  acceleration  and  prior  to 
braking.  This  velocity  is  usually  less  than  the  maximum  design  speed,  but  can  be  equal 

to  it. 

Crush  Load  Capacity 

The  maximum  total  capacity  which  a vehicle  is  designed  to  accommodate . This 
limitation  is  defined  by  either  a vehicle  weight  limitation  or  a passenger  comfort  criterion. 

Demand  Activated  Service  Policy 

A service  policy  in  which  routes,  which  may  include  intermediate  station  stops,  are 
generated  in  real  time  on  the  basis  of  passenger  demand,  i.e.,  point-to-point  routing 

with  demand  stop. 

Demand  Responsive  Service  Policy 

A service  policy  in  which  non-stop  routes  are  generated  in  real  time  on  the  basis  of 
passenger  demand,  i.e.,  point-to-point  routing  with  no  intermediate  stops. 


Demand  Stop  Service  Policy 

A service  policy  in  which  vehicles  travel  on  predetermined  routes  but  stop  at  sta- 
tions along  the  route  only  in  response  to  specific  passenger  demand. 

Demand  Type 

A system  deployment  parameter  which  specifies  the  demand  environment  on  which  a 
detailed  demand  model  will  be  specified.  Three  metropolitan  area  demands  and  four  ac- 
tivity center  demand  types  are  identified: 

1.  Metropolitan  area  - high  CBD,  high  reverse  commutation 

2.  Metropolitan  area  - high  CBD,  low  reverse  commutation 

3.  Metropolitan  area  - low  CBD,  low  reverse  commutation 

1.  Activity  Center  Line-Haul 

2.  Activity  Center  Circulation 

3.  Activity  Center  in  High  Demand  CBD 

4.  Activity  Center  in  Low  Demand  CBD 
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Design  Load  per  Vehicle 

The  nominal  passenger  capacity  of  each  vehicle. 

Deterministic 

A strategy  by  which  all  merge  conflicts  are  resolved  before  launch,  and  barring 
failures,  each  vehicle  is  assured  of  traversing  the  network  in  a predetermined  time. 


Dial-A-Ride  Service 

Transit  service  operated  by  generating  vehicle  paths  in  continual  response  to  demand. 
Downtown  People  Mover  (PPM) 

An  AGT  system  deployed  in  a CBD  environment,  or  the  UMTA  demonstration  program 
to  implement  such  systems. 


Empty  Vehicle  Management  (EVM) 

A set  of  strategies  which  govern  the  disposition  of  active,  empty  vehicles  not  as- 
signed to  a fixed  route  nor  enroute  to  service  a passenger  demand.  Alternative  strategies 
include: 

Circulation 

Vehicles  are  circulated  on  the  network  until  needed  to  satisfy  a demand. 

The  distribution  of  circulating  vehicles  may  be  based  on  historical  demand 
or  on  current  demand  patterns. 

Station  storage  - historical 

Vehicles  are  routed  to  stations  for  storage  based  on  historical  demand  data. 
Station  storage  - real  time 

Vehicles  are  either  stored  in  the  station  when  they  become  empty  or  are 
routed  to  other  stations  and  stored  based  on  current  demand  patterns. 
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Event  Model 


A representation  of  an  entity  (a  subsystem  or  process)  in  terms  of  discrete  states  of 
the  entity  and  the  time  required  to  change  from  one  state  to  another  for  use  in  a discrete 
event  simulation. 


Fixed  Block 


A longitudinal  control  or  headway  protection  mechanization  wherein  blocks  are 
hardwired  to  the  guideway  and  each  block  transmits  velocity  or  braking  commands  to  the 
vehicle  based  on  the  occupancy  of  preceding  blocks.  For  longitudinal  control,  the  com- 
mands may  be  altered  by  central  or  local  control.  For  headway  protection  the  blocks 
transmit  either  braking  or  velocity  limit  commands  to  vehicles  which  establish  upper 
bounds  for  any  other  commands. 


Fixed  Route  Service 

Transit  service  operated  on  predetermined  paths. 

Flow  Capacity  (P) 

V 

A measure  of  system  capacity  in  terms  of  passenger  spaces  per  second  past  a point; 
the  ratio  of  traveling  unit  capacity  to  average  route  headway. 


Fully  Connected  Grid  (FG) 

A grid  network  in  which  vehicles  proceed  directly  from  one  station  to  any  other 
station  without  retracing  any  one-or  two-directional  portion  of  the  guideway. 


Global  Variables 


Variables  stored  in  a common  area  and  known  by  one  name  to  all  segments  in- 
cluded in  the  program. 


Grid 


Any  guideway  on  which  vehicles  are  presented  with  a choice  of  paths  during  nor- 
mal operation. 


7-5 


Grid  Transit  (GT) 


A transit  system  deployed  in  any  demand  environment  which  uses  an  FG  or  PG 
network  and  has  more  extensive  operational  switching  capability  than  on  MSLT.  Gen- 
erally shorter  headways  result  than  in  MSLT.  This  category  includes  PRT  systems  and 
many  systems  which  are  often  referred  to  as  Group  Rapid  Transit  (GRT). 


Guideway  Interface 

The  vehicle  components  which  contact  the  guidewcry  for  support.  Usually  the  in- 
terface is  wheels  but  in  some  cases  it  is  an  air  or  magnetic  levitation  force. 


Headway 

A frequency  of  service  measure:  the  mean  time  between  vehicles  passing  a point 
along  a route  of  known  configuration. 


Heodway  Equation 

An  analytic  function  which  expresses  the  relationship  between  minimum  headway 
and  system  parameters  such  as  traveling  unit  (vehicle  or  train)  length,  cruise  speed,  ac- 
celeration, communication  delay,  and  expected  position  error. 


Intermediate  Vehicle  Group  Rapid  Transit  (IGRT) 

A class  of  AGT  systems  which  provides  multiple-stop  service  and  carries  from  25 
to  69  passengers  in  its  minimum  train  consist.  Low  speed  IGRT  systems  have  a maximum 
operating  speed  of  13  to  54  km/h  and  tend  to  run  at  15  to  60  s headways.  High  speed 
IGRT  systems  operate  at  speeds  greater  than  54  km/h  and  at  headways  which  usually  fall 
between  15  and  90  s. 


Intersection 


An  X-type  merge  with  2 input  links,  2 output  links,  4 ramp  links,  4 through  paths, 
and  either  2 or  4 queuing  areas. 


Large  Vehicle  Group  Rapid  Transit  (LGRT) 

A class  of  AGT  systems  which  provides  multiple-stop  service,  has  a minimum  train 
consist  capacity  of  70  to  109  passengers,  operates  at  a maximum  speed  of  13  to  54  km/h, 
and  usually  runs  at  heodways  of  30  to  90  s. 


7-6 


Lateral  Control  Interface 


Vehicle  and  guideway  components  that  interface  to  control  the  vehicle's  lateral 
movement. 


Loop 


A guideway  on  which  motion  is  unidirectional  during  normal  operation  (except 
possibly  at  short  station  segments  or  at  ends  of  runs)  and  which  is  defined  by  a closed 

path. 


Loop  of  Closed  Geometry  (S) 


A simple  loop  as  defined  above  which  encircles  no  area. 


Macro 


A standard  code  segment  that  is  generated  in-line  at  compile  time  by  specification 
of  single  statement. 


Maximum  Operating  Speed 

The  maximum  speed  at  which  a vehicle  can  travel.  This  limit  is  imposed  by  vehi- 
cle and  propulsion  system  design  constraints. 


Merge  Strategy 

A strategy  for  resolving  merge  conflicts.  Three  strategies  are  considered: 

1.  FIFO  (first-in,  first-out) 

2.  Prescheduled 

3.  Priority 

Metro  Shuttle  Loop  Transit  (MSLT) 

A transit  system  deployed  in  a metropolitan  environment  and  having  high  speed 
capability  but  no  or  limited  operational  switching  capability.  The  network  may  be  of 
any  type.  If  it  is  a grid  network,  however,  the  switching  is  of  limited  capability.  This 
category  includes  most  guidewsy  transit  systems  currently  deployed  in  metropolitan  areas. 
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Minimum  Traveling  Unit 


The  minimum  number  of  vehicles  with  which  a train  can  operate.  For  some  sys- 
tems the  minimum  traveling  unit  is  a single  vehicle. 


Minimum  Traveling  Unit  Capacity 

The  nominal  capacity  (not  crush  capacity)  of  a single  vehicle  times  the  number  of 
vehicles  in  a minimum  train  consist. 


Moving  Block 

A heodway  protection  mechanization  wherein  an  emergency  protection  zone 
which  moves  along  with  the  vehicle  is  established  around  each  vehicle.  Emergency  brak- 
ing commands  are  issued  to  the  traveling  vehicle  whenever  its  emergency  protection  zone 
infringes  upon  that  of  a leoding  vehicle. 


Multiple  Loop  (ML) 

Any  network  consisting  of  two  or  more  loops  and  requiring  that  passengers  transfer 
from  a vehicle  constrained  to  one  loop  to  a vehicle  constrained  to  another  loop  if  they 
wish  to  travel  between  two  points  not  served  by  a single  loop. 

Network  Element 

Either  a link,  merge,  or  an  intersection  modeled  in  the  DOCM. 

O 


Network  Type 

A system  deployment  parameter  which  specifies  network  configuration.  Seven  net- 
work types  are  identified: 

1.  Shuttles  (S) 

2.  Loop  of  closed  geometry  (L) 

3.  Open  loop,  one-way  (LI) 

4.  Open  loop,  two-way  (L2) 

5.  Multiple  loop  (ML) 

6.  Partially  connected  grid  (PG) 

7.  Fully  connected  grid  (FG) 
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Nominal  Capacity 

Vehicle  capacity  including  seated  and  standing  passengers  as  specified  by  the 
manufacturer  according  to  a passenger  comfort  criterion.  The  average  area  allotted  to 
each  standee  is  generally  at  least  2.5  square  feet. 


Non-determ  in  i st  i c 


A strategy  by  which  potential  conflicts  at  merges  are  not  considered  before  launch 
but  or©  resolved  locally  in  the  vicinity  of  each  merge. 


Off- Vehicle  Feeder  Travel  Time  for  Access 


The  mean  time  per  person  enroute  to  a specific  AGT  station  for  delay  or  non- 
vehicle  travel  (including  any  walking  to  feeder  route  or  waiting  for  feeder  bus,  transfer- 
ring between  vehicles,  parking  a car,  or  walking  all  the  way),  while  going  from  zone 

centroids  to  a specific  station. 


Off-Vehicle  Feeder  Travel  Time  for  Egress 


The  mean  time  per  person  enroute  from  a specific  AGT  station  for  delay  or  non- 
vehicSe  travel  (including  waiting  at  stations  for  bus,  walking  from  route  to  destination, 
transferring  between  vehicles,  or  walking  all  the  way),  while  going  from  a specific  sta- 
tion to  zone  centroids. 


On-Vehicle  Feeder  Time  for  Access 


The  mean  time  per  person  enroute  to  a specific  AGT  station  spent  aboard  a feeder 
vehicle  (including  feeder  bus  or  private  auto),  while  going  from  zone  centroids  to  a spe- 
cific station. 


On-Vehicle  Feeder  Travel  Time  for  Egress 

The  mean  time  per  person  enroute  from  a specific  AGT  station  spent  aboard  a 
feeder  vehicle  (including  the  feeder  bus  or  private  auto),  while  going  from  a specific 

station  to  zone  centroids. 


Open- Loop  Control 

Advancement  of  vehicles  by  user-q>ecified  control  independent  of  system  state. 
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Open  Loop,  One-Way  (LI) 

A single  loop  encircling  an  area  and  providing  one-way  circulation. 

Open  Loop,  Two-Way  (L2) 

Two  loops  deployed  side-by-side  encircling  an  area  and  providing  two-way 
circulation. 


PARAFOR 

A superset  of  FORTRAN  utilizing  PL/1  macros  to  odd  structured  programming  fa- 
cilities to  standard  FORTRAN. 


Partially  Connected  Grid  (PG) 

A grid  network  which  does  not  qualify  as  a Fully  Connected  Grid  (FG). 
Partitioned  Data  Set 

A type  of  file  organization  in  which  independent  groups  of  sequentially  organized 
records,  called  members,  are  on  direct-access  storage. 


Path 

A sequence  of  guideway  links  used  by  a vehicle  to  travel  between  two  points  on 
a network. 


Personal  Rapid  Transit  (PRT) 

A class  of  PRT  systems  which  provides  non-stop  point-to-point  service,  has  a mini- 
mum traveling  unit  capacity  of  3 to  6 passengers,  and  runs  at  very  short  headways,  usu- 
ally 3 s or  less.  Low  speed  PRT  has  a maximum  operating  speed  of  13  to  54  km/h,  while 
high  ^eed  PRT  has  a maximum  operating  speed  exceeding  54  km/Ti. 

Platoon  Movement 

Simultaneous  advancement  of  a row  of  vehicles  or  trains. 


7-10 


Practical  Minimum  Headway 

The  minimum  headway  at  which  vehicles  can  operate  under  normal  conditions. 
Prescheduled  Pathing 

A vehicle  pathing  strategy  in  which  the  primary  path  from  origin  to  destination  is 
predetermined  and  specified  for  all  station  pairs. 

Precision  Stopping  Tolerance 

The  tolerance  within  which  a vehicle  can  stop  at  a given  point. 


Quasi-deterministic 


A strategy  by  which  merge  conflicts  are  not  resolved  prior  to  launch,  but  informa- 
tion about  the  future  state  of  the  network  is  used  to  launch  vehicles  at  times  that  provide 
a high  probability  of  efficient  merging. 


Quasi-synchronous 

Operation  of  vehicles  under  point- follower  control  but  with  change  of  control 
points  allowed  to  resolve  potential  merge  conflicts  by  advancing  or  slipping  one  or  more 
slots. 


Reliability  Block  Diagram 

A diagram  that  illustrates  what  equipment  or  combinations  of  equipment  are  re- 
quired for  successful  system  operation. 


Representative  System 

A collection  of  values  for  the  following  system  characteristics  and  strategies: 

1.  Vehicle  characteristics 

2.  Guideway  characteristics 

3.  System  management  strategies 

4.  Reliability  characteristics 

5.  Cost  characteristics 
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Representative  System  (continued) 


The  range  of  values  are  chosen  to  be  interrelated  in  such  a way  as  to  represent  a 
general  class  of  state-of-the-art  systems  for  the  purpose  of  conducting  system  analyses 
within  the  SOS  program. 


Representative  System  Deployment 

A specific  combination  of  a representative  system,  demand  type,  and  network  con- 
figuration defined  for  the  purpose  of  conducting  system  analyses  within  the  SOS  program. 


Response  Time 


A frequency  of  service  measures  the  mean  time  between  a request  for  and  the  ar- 
rival of  a dial-o-ride  service  vehicle. 


Ripple  Movement 


Advancement  of  vehicles  and  trains  one  at  a time  for  a row  of  stationary  vehicles/ 


trains. 


Route 


A designated  set  of  destinations,  usually  defined  by  stations,  to  which  a vehicle 
must  travel.  The  path,  or  links,  to  be  traversed  between  any  two  destinations  is  not 
specified . 


Routing  Strategy 

A strategy  which  identifies  routes  for  vehicle^trains.  Two  alternatives  are  fixed 
routing  and  real  time  select  routing.  Real  time  routing  is  used  only  with  demand  respon- 
sive service  and  demand  activated  service,  while  fixed  routing  is  employed  for  demand 
stop  and  fixed  route  service  policies. 


Rural  and  Scattered  Urban  (R&SU) 


The  remaining  rural  and  urban  portions  of  counties  not  included  as  part  of  the  ur- 
banized ring  of  the  UA,  but  still  within  the  boundaries  of  the  SMSA,  Thus,  with  the  ex- 
ception of  the  New  York  and  Los  Angeles  SMSA's,  the  SMSA  consists  of  two  components  - 
the  UA  and  the  Rural  and  Scattered  Urban,  Both  New  York  and  Los  Angeles  Urbanized 
Areas  (UA's)  extend  into  counties  outside  the  boundaries  of  the  SMSA. 
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Scheduled,  Real  Time  Pathing 


A vehicle  pathing  strategy  in  which  the  primary  path  from  origin  to  destination 
is  selected  from  among  specified  alternatives  just  prior  to  departure  from  the  origin  sta 
tion  on  the  basis  of  current  traffic  conditions  on  the  network. 


Sector 

An  area  serviceable  by  one  vehicle  in  subscription  service  during  a prescribed 
time  interval  for  a specific  demand  density. 


Service  Type 

Either  non-stop  (personal  transit)  or  multiple-stop  (group  transit)  service. 


Shuttles  (S) 


A guideway  on  which  bi-directional  motion  occurs  during  normal  operation  and 
which  is  defined  by  a single  curve  connecting  two  distinct  end  points.  Also,  any  net- 
work consisting  of  two  or  more  simple  shuttles,  either  following  the  same  path  or  dif- 
ferent paths. 


Shuttle  Loop  Transit  (SLT) 

A low  speed  AGT  system  deployment  in  an  activity  center  demand  environment 
having  any  non-grid  type  of  network.  Thus,  SLT  system  deployments  require  no  opera 
tional  switching  but  may  require  passenger  transfers. 


Small  Vehicle  Group  Rapid  Transit  (SGRT) 

A class  of  AGT  systems  which  provides  multiple-party  service,  has  a capacity  of 
7 to  24  passengers  in  its  minimum  train  consist,  and  usually  operates  at  headways  be- 
tween 3 and  15  s.  Low  speed  SGRT  has  a maximum  operating  speed  of  16  to  54  km/h, 
and  high  speed  SGRT  a maximum  of  over  54  km/h. 


Standard  Metropolitan  Statistical  Area  (SMSA) 

A county  or  group  of  counties  containing  at  least  one  city  (or  twin  cities)  with  a 
population  of  50,000  or  more,  plus  adjacent  counties  which  are  metropolitan  in  charac- 
ter and  integrated  economically  and  socially  within  the  central  city. 
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Switching  Mechanism 


The  mechanism,  located  either  on  the  vehicle  or  the  guideway,  by  which  vehic  les/ 
trains  are  switched. 

Synchronous 

Operation  of  vehicles  under  point- follower  control  with  no  changes  allowed  in 
control  points  during  a given  guideway  trip. 

Theoretical  Minimum  Headway 

The  minimum  headway  at  which  two  vehicles  can  travel,  assuming  there  are  no 
merges  or  on-line  stations. 

Total  Value  Capital  Cost 

The  sum  of  all  capital  costs  except  interest  expense  over  the  life  cycle  period 
expressed  in  base-year  dollars. 

Urbanized  Area  (UA) 

An  area  containing  a central  city  (or  twin  cities)  of  50,000  or  more  population, 
plus  the  surrounding  closely  settled  incorporated  and  unincorporated  areas  which  meet 
certain  criteria  of  population  size  and  density  (urbanized  ring).  UA's  differ  from  SMSA's 
in  that  UA's  exclude  the  rural  portions  of  counties  composing  the  SMSA's,  as  well  as 
places  that  were  separated  by  rural  territory  from  the  densely  populated  fringe  around  the 
central  city.  The  components  of  the  UA's  include  the  central  city,  as  defined  above, 
and  the  urbanized  rings,  as  defined  below. 

Urbanized  Ring  (UR) 

Various  areas  contiguous  to  a central  city  or  cities,  which  together  constitute  its 
urbanized  ring,  or  "urban  fringe,"  as  termed  by  the  Census  Bureau. 

Variable  Cost  (base  year) 

The  annual  cost  of  operating  and  maintaining  a system  expressed  in  base  year  (1977) 
dollars.  Variable  costs  include  maintenance  costs,  energy  costs,  and  administrative 
costs  for  both  the  AGT  and  feeder  systems. 

Vehicle  Capacity 

When  used  in  correlations  of  vehicle  dimensions  and  cost  to  capacity,  nominal 
vehicle  capacity  is  assumed.  However,  the  system  simulations  interpret  vehicle  capacity 
as  the  maximum  number  of  passengers  which  can  occupy  a vehicle  at  one  time. 


7-14 


APPENDIX  A 
HiPO  DIAGRAMS 


A-l 


Author: System/Program:  Date: Page: 

Diagram  in-  VTOC Mama:  Visual  Table  of  Contents System  Avoiiafaility  Model 


I 


A-2 


Author:  Svstem/Prooram:  AGT-SOS/SAM Date: 

Diagram  ID:  VTOC Name:  Visual  Table  of  Contents n^srriptinn-  Input  Processor 


3 

a 

3 

o 


<s> 

0) 

u 

o 

al 


3 

a 

c 


CN 


<D 
O 
O 

« °- 
CD  •*“ 

0 g. 

c 


5 

o 

to 


o 

< 


Q. 

' k- 

o 


ZJ) 

O 


C — ' 

2 7 

> — 

M< 


o 

CN 


o 

JZ 

3 

< 


Q 

E 


A-4 


CN 


CN 


CT 

<0 

Q. 


SI 


:> 

a 

> 

o 

oo 

1“ 

o 

< 


a> 

D 


o 

E 1- 
S;  3 
E ^ 
« 21 
m —— 

> < 
CO  ^ 


O 

e 

CN 


9 

L-  E 

o «! 

■£  ci 

3 .2 

< Q 


3 

a 

3 

o 


A-5 


Re  turn 


o 

CL 

c 


4) 


» => 
to  ~0 
Q D 
4) 


% 

$ 

> 

0 

oo 

1 

h— 

o 

< 


0) 

D 


E 

a 

k. 

O) 

O 

%C* 

E LU 

<u  i/l 
“< 


£ 

CO 

z 


CM 


q 

l:  E 

o CO 

■£  & 

3 .2 

< a 


3 

a. 

3 

O 


c 

o 


t-  c 

I & 
£ 1 
-£  o 

>V  CL 
to  c 
_Q  t 

Z>  ° 

oo  U 


a> 

g 8 

g £ 

a)  a> 
c °° 
o'? 

5 < 

-O 

a>  o 

3 S 

"O  D 

J cr  d 

o ir  o 

uo  u_  c*r 


CM 


P 

o 

a; 


o 

CL 

<d 

q; 

a> 


co 


_o 

<o 

Q 

*-  "O 
4>  — 
CD  O 
C _C 
<D 

to  t— 

D -C 
Cl-  H- 


5 


i r 


c 

0) 

c 


42 

D 

CL 

• 

to 

4) 

c 

a> 

E 

0) 

D 

<u 

c 

o 

_c 

-L— 

o 

u 

o 

L_ 

O 

> 

CL 

£ 

o 

o 

1— 

o 

"O 

4) 

tsz 

_c 

o 

o 

4) 

t_ 

t° 

4) 

o 

c: 

4) 

to 

JO 

o 

_c 

to 

4) 

C 

-C 

o 

E 

u. 

4> 

JO 

L_ 

o 

•4— 

u 

C 

o 

• 

4) 

•4— 

X 

o 

O 

E 

• 

cs 

"O 

JD 

-t— 

O 

4) 

i_ 

<u 

_Q 

E 

4) 

•4 — 
to 

>V 

to 

_Q 

4~ 

c 

4) 

C 

o 

~o 

to 

D 

Q 

z> 

~o 

4) 

_c 

L_ 

L. 

*5 

CL 

-o 

t— 

4) 

O) 

D 

D 

CL 

o 

o 

4> 

C 

C 

to 

E 

to 

t_ 

4) 

to 

4) 

4) 

o 

4} 

4) 

4) 

to 

-C 

_c 

o 

_C 

_C 

_C 

O 

** 

■*— 

L— 

■*“ 

4— 

CL 

"O 

o 

“O 

*o 

~o 

"O 

D 

• 

o 

o 

a 

O 

<d 

0) 

o 

4) 

4) 

4) 

4) 

c^. 

E 

a; 

an 

QC 

QC 

• 

• 

• 

• 

• 

• 



CM 

CO 

■'t 

lo 

o 

jo 

o 

4/> 

a> 


a> 

CD 

c 

u 

to 

to 

D 

CL 


JD 

_Q 

D 

O 

O 

CL 

e 

o 


A-6 


Return 


CD 

C 

4) 

C 


3 

a 

*- 

3 

o 


<u 

~a 

o 

c 

~o 

c 

D 

(/> 

c 

o 

CL 

u 

VI 

0)  . 
"O  c 

-£•2 
= J2. 
-O  2 

D i- 
0)  O 

O'  (J 


c 
u: 

t — 

0 

1 p 

O D 

Z Q 


Q. 

O 

<u 

O 

_* 

i— 

o 

2 

<u 

Z 


CN 


C 

o 

_o 

0) 

1_ 

4) 

4- 

D 

CL 

E 

o 

* 

Si 

o 0 

TD 
C 

o 


c 

£ 


•z:  c 
D O 

i/i 

~D  5 

D “» 

O <-i_ 

os:  o 


o. 

i— 

u 

*/> 

4) 

T> 

4) 

*- 

D 

O 

i— 

"O 

D 

4) 


CN  CO 


5 


_o 

5 

0) 

IE 

c 

LE 

<u 

Q 

o 

4— 

a 

o E 

<*3 

°c 

°<3 

Q 

— 

tz 

— 

oo 

D 

O 


4) 


5 

C 

o 

p 

C/O 

CN 


§ E 

‘Z  Q 

c °° 
tr 
4) 

Q 

4) 

D 

£ 


CO 


<D 

o 

c 

o 


4) 


E o 

£ E 

t E 

4)  D 
a_  oo 


A-7 


Ref urn 


e /D  AGT-SOS/SAM 

Author: System/Program:  Date : Page:  _ 

2.3  AINREG  Read  Region  Descriptions 

Diagram  ID: Name: -Description:— 


A-8 


Return 


cn 

<■0 

CL 


<U 

z 

<y 

N 

o 

c 

< 


a> 

Q 


> 

0 

LO 

1 

h- 

o 

< 


I z 
2 < 
5:  ^ 

e by 

2 z 

>•  < 
C/0 


a> 

E 

fO 

Z 


CN 


3 

< 


A-9 


Return 


5 


> 

0 

oo 

1 

t— 

o 

< 


c 

<D 

c 

o 

CL 

e 

o 

U 

*D 

O 

0) 

O' 


O) 

2 LL. 

5:  o_ 

t;  y 

3>  < 


in 

CM 


o 

JC 

3 

< 


o 

E 


3 

a 

4-> 

3 

o 


CN, 


-2  2 

E .2 

-7  ® 

Z.  a; 


o 

i_ 

3 


a) 

L. 

3 


c 

c 

0) 

4> 

c 

c 

0 

0 

Q. 

«✓> 

CL 

E 

a> 

E 

0 

0 

0 

U 

Cd 

U 

a) 

o 


_Q 

O 


i! 

E 

3 

C 

0) 


TJ 

D 

<u 


0) 

> 

a> 


<u 

_Q 

E 

3 

z 


<N 


CO 


T 


"O 

c 

D 


O 


O 

i_ 

3 


C 

4) 

C . 

0 !/> 

CL  0) 

1 E 

o *. 

"O  0 

D J9 

4)  v*: 
Q£  0) 


— CM 


I 


_a> 

_a> 

_4> 

iZ 

4) 

U_ 

iz 

4) 

L_ 

LZ 

Q 

_3 

Q 

_3 

Q 

o<3 

£ 

<*3 

*5 

LL. 

«3 

*- 

</) 

c 

c Z 

4) 

4)  O 

C 

C C£ 

O 

CL 

wn 

0 *_ 

CL  0 

E 

a> 

E 0 

0 

U 

c 

CzT 

0 tt: 

U LLI 

3 

Q. 

C 


CN 


CO 


A-l  0 


Return 


Author: System/Program:  AGT  SOS/SAM Date: Page: 1 ol 

Diagram  in  2-6 Mam.:  AFRCMP Description:  Compute  Subsystem  Failure  Rates. 


A- 11 


Return 


Author : System/Program: ..  AGT  SOS/ SAM Date . Page: 

Diagram  ID  ^.7 Name:  A1DMND Description: Demand  Processi  ng 


A- 12 


Return 


s-  ° 

"i 


a) 
a> 
c 
© 
QJ  to 
O)  uj 

fo  O 
Q.  Cl. 

*o 
c 
< 
© 


_c 

© 

a,  > 

§"8 
© 
cm 


2 

< 

oo 

o 


o 

< 


0) 

Q 


E 

03 

k- 

a> 

O 


E Q. 

“ > 
«/) 

> ~ 
to  <£ 


0) 

E 

(0 

Z 


CO 

CN 


d 

E 


o 

.c 

3 

< 


A- 13 


Refurn 


D 
o Q 


D 

<D  Q_ 

cn 

«?•  -o 
c 
D 

JU 

o 

_c 
0) 

> 


2 8 
CD  

Q "5 


£ 

> 

0 

V) 

1 

H— 

o 

< 


u 


0) 

Q 


§>- 

1 ° 

E LU 

2 

> < 

CO 


O' 

CN 


w E 

O re 

"5  o' 

3 .2 

< Q 


3 

a 

3 

o 


CN 


c 

o 

CD 

<u 


o 

Q. 


i C «_ 

<1)0  0) 

o _o 


_Q 

E 

3 

C 


.E  ~o 
c 
o 

o E 
• - 0) 

o 

r'g 


0 -O  § 
S § c 
a)  £ E a) 
cr>  _E  a>  cn 
o o -O  o 

*o 
c 


> 0) 
< > 


0) 
> 
o < 


D .o 

° cc 
t2  2 

<u  <_ 

D)  -c 
C u 
m O 
w a> 


0)  • 
-O  -O 

II 

0)  "O 

CD 

s 

£ ° 
O C 

0,  .2 
_C  CD 
+-  O 
0)  *" 
-C 

|8 
E a) 

6 .£ 


CN 


o 

o 

“O 

a> 

c 

c 

o 

E 

to 

0) 

0) 

■O 

~o 

E 

c 

0) 

o 

— 

c 

o 

o 

_c 

CD 

a> 

> 

a> 

i— 

co 

c 

o 

0)  c 

I i 

0) 

CD  T3 

.5  -o 

S § 
0)  c 

§-.2 

CD 

0)  d) 


0)  o 
> 0) 


0) 


_c 

0) 

> 


a) 


o 

o 

0) 

.2  ■? 

c E 

O 0) 
x "O 

o ~a 

is>  C 


-E  - 2 
o 2 a 
Z -£  2 


IT) 


yi  ~0 

c E 

0)  « 
vt  O 
«/> 

o -o 

Q.  C 
^ D 

C 

o 


c 

o 

"CD 

0) 


O 

o 

0) 


0) 

_o 

E 


CD 

0) 


a> 

JE 

U- 

CD 

C 

4 ■ 

o 

l_ 

0)  . 


CD 

3 

2 -n* 
•£  ^ 

8 E 

«-g 

fg 

> n 


c -c 
o 

a>  o 

CD  0) 

2 c 
0)  — 

hide  mi 

a-  2 
° o 
J)  E 

<j  0) 

•O 
_c  _ 

mber  of 
region  i 

> ? 

0) 

0)  ^2 

3 _C 

° o 
® - 
-C  n 

> o 

J!  g 

c o 

<D  8 
_c 

-4—  ^ 

•*-  o 

c 

0)  ^ 

a,  o 

0)  ’cD 

0)  •“ 

"tr  O) 

■*-  fl) 

-J-  </> 

3 c 

3 0) 

o c 

3 c 

CL 

Q.  *CI 

CL  _ 

Q.  O 

§ O 

U J> 

§ "g 

p -C 

O 8 

E “ 
o o 

U a 

u 8 

u t; 

• 

• 

• 

• 

CN 

CO 

IT) 

/ 

_L 


to 

0) 

•4— 

8 

to 

u. 

"e 

8 

3 

0 

<✓> 

«)  _ 

3 

0) 

CD  -E 

a> 

O 

P) 

c 0 

8— 

8 s 

V 

_c 

C 

,2 

1c 

CO 

1c 

0 

O 

Ic 

0) 

O i; 

0) 

O 

0) 

E 

> 

Cl-  Q) 

> 

0) 

b 

> 

■4— 

u. 

M—  “ — “ 

U- 

c 

U- 

-o 

o 

V 

0 ~o 

0 

5 

lo 

O 

a> 

e c 

uo  D 
*—  r- 

to 

-0 

E 

to 

L_ 

o 

0>  lz 

0) 

c 

0) 

0> 

0 

0) 

V 

_Q 

-Q  _n 

0 

-O 

— 

0 

_Q 

3 

E 

Lo 

1-6 
■7  0 

Z.  <u 

E .0 

zl 

0 

•4— 

«✓» 

E 

D 

z 

> 

0 

L. 

c 

E 

3 

Z 

<-4- 

O 

• 

• 

• 

• 

• 

r " 

CN 

CO 

CO 

A- 14 


Return 


Author:  System/Program: Date: Page: 

2.10  AIFAL  ^ . . Compute  Delays 

Diagram  ID:  Name: Description: 


X 

o >— 
— o 


© 

~a 


© 

o. 

X 


veh 

o 

o 

© 

nun 

© 

Lm 

© 

O) 

a 

3 £ 

05 

o 

L. 

<D 

© _2 

k_ 

a; 

> 

E •“ 

> 

< 

£ 

< 

** 

3 

a 

• 

• 

3 

— 

CN 

o 

© 

Q. 

X 

© ^ >.  - 

U.  Z u -£ 

ili  8 
© " © 
C -C  L. 

IS)  O O 

!r  O ■*- 


c c > — 

S v2  « ^ 
o *r  c -- 
Ql  £ .r  o 


• 

O 

O 

W1_ 

O 

« 

© Q_ 

• 

© 

© 

© 

>"  X. 

failure 

1— 

J3 

_c 

i— 

O 

V4- 

c 

• 

fS> 

X 

CL 

X 

-4— 

_c 

o 

D 

ips  delo 
each  t 

_c 

O 

— 

o 

© 

i—  J— 

o 

o 

D 

_c 

© 

t_ 

« 1 '■4— 

D 

© 

t— 

© 

i— 

£ 

(J 

D 

© 

"O 

_© 

2 

LO 

© 

o — 

- 5 
© £ 

3 

VO 

o 

u 

E 

-O  © 

is) 

© 

0) 

E 

c 

IE 

© 

-4— 

Sc 

•4— 

«/> 

© 

> 

© 

Q- 

*C 

e n 
ay 

o 

a> 

05  — 

~o 

1— 

a 

O © 

© 

C 

© 

© 

*-  ~a 

•4— 

0 

© 

05 

© 

_a 

i_ 

> 

c 

> _c 

© 

J 

_x 

c 

u 

IE 

© • 

o 

© 

© 

V) 

is> 

D 

• 

O O • 

..  o © 

2 o 5 

i/l 

— 

> © 

© 

Q. 

<D 

© c — 

*o 

o 

“C 

D 

u. 

"O  © 
D — 

CL 

E 

■o 

o 

u 

D 

E i 2 

£ 

© 

Cxi 

© 5 

Ctl  <2 

o 

© 

ce; 

2 

U £ ‘o 

• 

• 

• 

• 

• 

• 

< — 

CN 

00 

LO 

S3 

T 


°.  i 

CN.^ 


t 


_c 

© 

o 

o 

o 

, 

o 

“3  c 

L_ 

O 

o 

u_ 

© 

o 

© 

© 

o 

1— 

o 

£ 

C — 

— ~o 

«-4- 

vo 

i — 

o 

VO 

0 

u- 

VO 

o 

VO 

u_ 

O 

c 

o 

44— 

o 

2 

VI 

© 

IS) 

o 

IS) 

© 

E 

O' 

_x 

r~ 

O O 
C © 

_© 

iZ 

E 

o 

1/1 

© 

#E 

D 

O 

E 

' , w» 

0) 

E 

Co 

-4— 

© 

l/l  © 

© — 

o 

Cl 

U_ 

cxl 

Q) 

© ,J- 

V-*- 

.2-  _© 

*o 

$ 

O 

1/1 

*0 

c 

Fi 

o 2 

L_ 

x_ 

D 

LZ 

3 

t 

© 

■4— 

o 

ac 

© 

c 

o 

1— 

o 

© 

u 

*+- 

CO 

© -c 

— u 
o o 

o 

4— 

oo 

0) 

O) 

c 

^2 

.2  § 

*~  i_ 

I/)  ~*~ 

_C 

© 

si 

© 

E 

Lo 

© 

2 

c 

L_i 

fai  lu 

O 

4 ■ 

Ln 

IE  ° 

© ir 
> £ 

o 

o 

wo 

VO 

o 

a. 

each 

'-TV 

2 c 
Ci  !_i 

link 

Passe 
wi  the 

# 

. 

• 

• 

. 

• 

— 

CN 

CO 

in 

>o 

A- 15 


Return 


A- 16 


3 

a 

3 

o 


t n 
to 

a> 

o 

O 

t=. 

a. 


3 

a 

c 


Q 

< 

LU 

• 

$ < 

3 _ 

a * 

> 

“O  CN 
05  . 

• ^ CN 

§■« 

2 6 
~o  a; 
d co 
CD 
DC 


"O 

C 

o 

un 

ID 

■*- 

D 

i— 

0) 

w 

3 


_Q 

D 


ce: 

co 

co 

3 

co 

< 

CN 


CN 


<0  CN 

■4—  • 

O CN 


I! 

— ' C t 

O 0) 


I • 

T) 

£.2 
c/>  I— 

_D  O 
3 0-, 

wo  — J 

_c  *a  < 
-h  c u_ 

o g o 
° I 5 

O ^ < 

L< D CO 

ui  C 

a)  o — 

*-  . 

£ 5-1 

* s^- 

v 


CN 


0 -c  • 
Q.  O O 

c o <u 

1 o CO 

U .£ 


-D 

C 

o 

l/> 

05 

E 


o 


LU 

Q 

• > 

-g  £< 

O "'-t 

— _n  * 
.2  o ~ 

■S  O ™ 

> > CN 

£ ScN* 

i.-o  g 

§ IE  ^ 

u 5 


k. 

o 

U- 

x 

4— 

15 

_o 

CO 

”5 

X 

> 

O . 

i_  4? 

o ^5 

CL. 

< 

CO 

05  "o 
C ^ 

• 

<U  cO 

a £ 

CN 

« 

O _C 

CN 

CL  4- 

• 

-2  c 

CN 

3 05 

CL  J- 

O 

E i£ 
o tJ- 

05 

CO 

U 55 

X 

_o 

"O 

c 

o 


“U 

c 

a 

a> 

o 

c 

o 

c 

V 


3 

CL 


N 

CO 

_l 

u_ 

> 

< 

-O 


.5  ® CN 

° 3 CN* 

E s • 

(U  o <N 

E • 

. o 


E ^ io 
o ^ 

U = 


i— 

Z> 

O 

< 

rx 


CD  CN 
S CN* 
E CN* 


o ° 

P-  <0 

CO 


3 

o 


T 


/ 


CN 


CO 


CO 


o 


A- 17 


o 


E 

O) 

> 

00 


(1) 

_D 

O 

> 

"O 

<v 

1— 

‘5 

CT| 

V 

Cel 


*D 

D 

O 

O' 


E 

<0 

O) 

o 


Q 

< 

UJ 

Cel 

< 


o> 

E 

CO 

Z 


t?  ^ 

^ Iz 
-d  2: 

3 

V)  4J 

•oi 
E 5 

V lx. 

O c 
t 
0) 
fli 

r.  v» 

D ^ 
. o 
TT  _Q 
O D 


8 

U 


53  “o 
-O  c 

I 1 

0 r- 

■£  -5 

w.  O 
O “J 

fli  O) 

O)  c 

O Z 

< c 


.§  g\§ 

oo  I—  ct;  t— 


"O  "O  "D  _C 

o o o o 

4l  4)  41  O 

cse  cxe  oe  uj 


4> 

®-c 

§ O 
IS  uj 

<2  cn 

«-£-  .E 
0 5 
q)  Q 
c 

E o 

V ^ 

Z.  ^ 

qj 

_c  jc 
■*-  o 
m-  o 
O U.1 

0)  c 
oj  — 

0 u> 

1 I "8 

1 1 2 

b CD  “O 

I! 

J;  0J 

-J  Q 


S’ 


5 -8 

* s 

U CL. 

lc  “D 
0)  C 

> i 

O « 
fc  r: 

-g  -5 

E o 

D LU 

z O) 

-O  .E 

2 R 

cn  Ci 


CD 

C 


0) 

Q. 

O 

E 

<D 

£ 


<*3 

c 

o 

*o> 

QJ 

-C 

o 

o 


X 

o 

cn 


CD 

c 


-C 

0) 

> 


S' 

“ <u 

-si 

o •= 


0) 

i 5. 


X.S  ■ 
u 

c £ - 

0) 

D O 
C T CL. 
Q>  0)  » 


o 

-C 

s 

-fe 


CD 

•|  "8 
o *E 

21 

2 E x ^ 


"D  -C 
O O 
<U  O 
CZ  UJ 


JS 

D 

O UD 
<U  -C 

° 8 
Qj  UJ 

5 o 

-n  ' 

> 1 
T)  p 
O 

5 a) 

c*  Q 


u u 

§ IE 

c « 

Q>  > 

.E  ‘S 
1 1 
TB  “ 

— QJ 

-8  S' 
1 | 
< 


_ X 
4> 

Q « 
O)  fe 


ur 

o 

o 


o 

5 

J 

D 

~0 

QJ 

JZ 


“D  “D  ~D  “D  *a 

o o o o o 

<D  d)  O D 
Q£  cn  cn  cn  cn 


c 

c .2 

O 

Of 

_c 
-C  CD 

8 8 

^ J£ 

c »— 

VO 

c — 
O U 

£ *£ 

m > 

c*-  w- 

o o 

ii 

£ E 

D D 

z z 

*u 

o 

QJ  0) 
cn  cn 


"8 


_C 

c y 
o ° 

UJ 

CD 

4>  c 
Ckf 

-C  ? 

U ._ 

o c 

LU  C 

C O) 

— d> 
vo  cn 
4) 

v» 

CL 

5 5 


“O 

•r  ^ 

QJ 

~o 


QJ 


“O 
D 
QJ 
or 


S' 


“D 

O 


“D 

C 

o 

E 

QJ 

o 

-C 

u 

o 


"U  43 

I I 

0) 

Q 2 2 
c O O 
E u: 

ai  vo  v> 

X-  QJ  QJ 


~U  “O  T3 
O O O 
O QJ  U 

cn  cn  cn 


o - (N  n ^ in 


'O  rx 


cn  ex  o 

— CN 


co 


A- 18 


Return 


1X1 


- 7 

o C 
o 


o 


o 


Cl 

™ >- 
05  -) 

(0  _ 

a.  7Z 

O 


_Q 
3 

co 

3 
QJ^ 


5 

< 

CO 

0 

LT) 

1 

h- 

o 

< 


o 


a> 


a> 

Q 


E 

<o 

3> 

2 cz 

a.  co 

> co 

c — ) 

QJ  ' 

4=  CO 

VI  - 

> < 

00 


CN 

CO 


o 

E 


CD 

3 .2 

< a 


A- 19 


Return 


E 

- i? 

® */> 

tA 

_Q 
2> 
tn 

at 

<T3  LU 

Q. 


5 

$ 

> 

O 

oo 


o 

< 


0) 

D 

CL 

E 

o 


■g 


a) 

o_ 

"D 

c 

o 

c 

& 

~o 

c 

D 

c 

o 

"a 

4) 

oz 

l_c 

o 

D 

LU 


E 

a 

W 

O)  . 
C 

£ £ 
I o 

” a; 
<« 

>•  < 
C/5 


E 

(O 

Z 


CO 

CO 


9 

E 


o 

.c 

3 

< 


A-20 


Return 


Author: System/Program:  ^ G T-  S Q$/SA  M Date: Page:  • 1 of — ! 

Digram  in-  3,4 Name: AVDEL Description:  Compute  Vehicle  Deloy  Times ,qnd_VehIcle 

Aval  labi  li  fy  


3 

Q. 

+* 

3 

o 


© 

E 


O) 

c 


& 


o 

in 
o-g 

jj  a 
o <s) 

IE  D 

>.E 


© 

E 


>>  ° 
D r\ 


© 

Q 


v 

ic. 

© 

> 


"O 

I— 

D 

"O 

c 

o 

IS) 


_Q 

_D 

”5 

> 

< 

_© 

u 

1c 

© 

> 


® -D 

E o 

I—  *i- 
© 

CD  O- 
C __ 
— T3 

s | 


o 


© 

— o 

O D 
LU 

5 o 


f 


• _c 


<D 

O 

o 

w 

CL 

O 

• 

CO« 


5s. 

o 

o 

o 

"O 

© 

*o 

c 

o 

-O 

© 

c 

.E 

o 

4— 

*- 

I/I 

CD 

c 

X 

X 

o 

a 

L. 

© 

© 

CL 

~o 

o 

© 

_© 

O 

© 

IE 

1c 

© 

© 

> 

> 

© 

© 

4— 

3 

3 

CL 

CL 

E 

E 

o 

o 

U 

U 

♦ 

• 

> — 

CM 

© 

E 


CD 

c 


_Q 

o -2 


© 

Q. 

O 


■ — -3T  ./v 

*-  © O 

s.  * 

u |t 

c o ° 

o £--o 
F E c 

a)  O o 

-out; 


CO 


o 

> 

o 

_© 

o 

1c 

© 

> 

© 

3 

CL 

£ 

o 

U 


3 

3. 

C 


c 

o 

£ © -o 

t;  o 

^ -C  'jr 
-Q  O « 
3 O 
W ©-o 
u-  c C 
O O 

l-  tn  E 
© © © 
-a  E O 

§“-o 

z £ § 


g>  -2  "S 

O)  — 
C)  *- 
O ac  © 

a.-©  "o 

O ° 5 

uj  a 

© r-  £ 

•o-S^ 
•-  © 

-©.§!? 

>1-0 


o 

ac 


o 

u— 

UJ 

© 

L. 

_3 

'5 

U_ 


A-21 


Return 


_Q 

_o 

'5 

> 

< 


C3 

a 


oijE 

0) 
l/l 
</> 

D 

a. 

'c 

o 

D i— 

aa: 

c 

o 


O 


< 

oo 

\ 

I/O 

0 

uo 

1 

I— 

o 

< 


oi 

O 

O.  I — 

E ^ 

9>  X 

*■>  T” 

(/l 

£ < 


0) 

E 

z 


lo 

CO 


o « 

■£  o' 

3 .2 

< Q 


3 

a 

♦-* 

O 


o 

CO' 


— ~T3 

• — CO 

O 0) 

4)  -C 
O)  « 
c ® 

V) 

CO  l— 

o o 
a.  u_ 


o 

o 

u 

l_ 

£ 


-Q 

_o 

'6 

> 

o • 

I.  "O 
4)  « 
O) 

s? 

i/i  rr 
i/i  4) 

D "O 
CL  — 

<D  ^ 

3 © 

Q_ 

p-  i/> 

E 0) 
<J  *£ 


3 

a 

c 


*D 

<D 

>s 

O _ 

Q ^ 

</) 

,/>  CO 

•:0 
J—  CL. 

o 

_c 

i/1 

0) 

V X 

u. 

-C 

CD 

h— 

c 

<u 

1/1 

>s 

o 

CO 

o 

a> 

c_ 

Q 

A-22 


Return 


Author:  System/Program: AGT~SOS Date: Page: 1 of 

Diagram  m 3.5.1 Name: __APDEL rwription-  Compute  Passenger  Delay  Time  and 

Passenger  Availability 

Input  3.5  Process  Output 


A-23 


Return 


Author: System/Program:  AGT-SOS/S  AM Date: Page: ] of ! 

Diagram  m 3.6 Name:  AVFLSZ Description:  Compute  Maintenance  & Stondb^Fle_et 

Measures  


o' 

"O 

*o 

o 

~o 

c 

o 


05 

c 

<L) 

■4- 

3 

CL 

£ 

o 

U 


l 

c 

a> 


o 

£ 

"O 

_0 

3 

~o 

<v 

JZ 

V 

«/> 

0 

05 

0 

<15 

g s 

J! » 

•4— 

« 8 

3 ul 

§■  QJ 

1 g 

U o 


— cs 


a> 

3 


J5 

o 

IE 

a) 

> 

05 

05 

O 

05 

S 

o 

JZ 


a» 


o 

-i  c 

o 0 

9-  o 

E cr 
o o 
<J  «i: 


CO 


05 

o 

E 

a> 


o 

JQ 

£ 

3 

C 

E 

3 

E 


o 

-C 

0 

-4— 

3 

Q. 

1 

U -Q 


CJ 

N 


a 

a> 


<x> 

> 

4-> 

o 

o 

a> 

_c 

<y 

3 

CL 

E 

o 

U 


m 


</> 

05 

_ 

3 

• 

j== 

o 

£ 

• 

CO 

O 

c 

o 

O 

QC 

_c 

LU 

N 

Cl 

— 

~o 

05 

15 

o 

i. 

*6 

_a 

CL 

0 

a 

o 

L- 

<D 

«4— 

05 

c 

3 

CL 

5 

E 

o 

05 

U 

O 

• 

o 

o 

O) 

E 05 
05  N 

5 2 

05  05 

_C  _05 

<-t_ 

05 

2.  05 

3 O 
CL  C 

E g 

u S 


CN 

o 

• 

CO 

CL 

U 

LL 

CL 


05 

O 

c 

o 

c 

05 

c 

'o 

E 

"o 

o 

•*- 

0) 

05 

o 

l_ 

05 

5 

0) 

-C 

■*— 

05 


3 '7, 
CL  . 
E 05 
O 05 

U d 


00 


CN 


o 

co 


E 

05 

CO 

X 

L/5 

L_ 

o 

05 

E 


_c 

o 

o 

Lu  -a 

c .2 


05 

CL 

o 


3 

G. 

C 


0) 

c 

o 

c 

05 

-4- 

C 

’o 

:> 

•O 

_05 

3 

"O 

05 

O 

LO 


o 

c 

05 

3 

cri 

05 


05 

U 

c 

05 

a 

■ 

c 

C5 

05 

_o 

C 

o 

> 

c 

■ — 

■a 

o 

05 

u- 

3 

0 

~o 

u 

05 

V 

_L 

L 

O 

o 

oO 

uo 

c "5 

O 

</>  I I I 

2 O0  "O 

3 O 

c *u 

O O 05 
-L  *“  CL 
05 

05  05  "O 

— CtC  C 

5 

Lc  *5  £ 
o 0 a 

>UJ  (J 


0)  «x 

-JC  05  U 

■*-  — o 

4.  Urn 

° -*p  r.  ~o 

05  O — o 

^ C * L 
u_  o 05 
O •-  CL 
O) 

0)  "O 


S’ 


05 

< o c2 

-C5  o 
05  F -C  c 

£ 5 y t 

! — Z.  LU  (J 


A-24 


Return 


A-25 


Return 


o 


(9 

CL 


4) 


O 

O 

c 

D 

C 

o 


<v 
. . •*- 

4! 

S Q 

Q E 

o 
V 


< 

LT> 

0 

OO 

1 

1— 

o 

< 


05 

o o_ 


E U 

o LL 


>• 

00 


E 

ra 

Z 


Csl 

o 

CO 


o 

p 


— 05 

3 .2 

< Q 


A-26 


irn 


s 

S 

> 

o 

to 

I— 

o 

< 


“D 

c: 

o 

to 

ft) 


as 

en 

<s 

a. 


o 

G 


_Q 
O 
_Q 

2 

C_ 

0) 

c 

5 

+- 

DlE 

ofq 

U 

cOJ 

•si 

•col 

oft) 

D< 


E 

H3 

05 

O Cu 


E U 

o CO 

tS  a; 
>•  o_ 
co 


as 

E 

<0 

Z 


CO 

-o 

CO 

0 

L E 
o 2 
■£  5s 

5 .2 

< Q 


& 

o 

u 

u 

cc: 

> 

6= 

ft) 

ft) 

u 

to 

't 

ft) 

ft) 

CD 

to 

c 

ft) 

to 

t— 

o 

&. 

>v 

o 

o 

D 

u_ 

LL_ 

CO 

A-27 


Return 


o 


<D  (1) 


(13  • — 

a.  u_ 


<u 

_D 
D 
> 
4— 

a>  D 

S £- 

Q D 

O 


S 

> 

0 

CO 

1 

1— 

o 

< 


a> 

Q 


E 

ro 

W. 

O •- 
£ ^ 

E § 

> < 
CO 


O) 

E 

ra 

2 


rv 

CO 


o 

L'  E 

C 

•£  CT> 

5 .2 

< Q 


A-28 


Return 


<u 

o 

o 


D 

Ql 

+- 

o 


o> 

Q 


> 

o 

CO 

s 

H 

o 

< 


C 

0) 

c 

o 

U 


£ o 

2 Q> 

O)  — 

O «Q 

££ 
E __ 
2 o 
D 

>■  </> 
CO  •- 


4) 

E 

<c 

Z 


u 

O 

i— 

> 


o A3 

■£5  o> 

3 .2 

< Q 


A-29/A-30 


APPENDIX  B 


REPORT  OF  NEW  TECHNOLOGY 


The  System  Availability  Model  (SAM)  provides  two  system-level  avail- 
ability measures  and  fleet  size  data  for  Automated  Guideway  Transit  (AGT) 
systems.  The  first  availability  measure  is  the  percentage  of  vehicle  opera- 
tional time.  The  second  availability  measure  is  the  percentage  of  passengers 
whose  wait  is  below  a specified  threshold. 

The  fleet  sizing  data  establishes  the  number  of  maintenance  and  stand-by 
vehi cles . 

The  SAM  operates  in  conjunction  with  the  Discrete  Event  Simulation  Model 
(DESM).  The  DESM  output  provides  the  delay  information  for  the  SAM  analysis. 
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